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La piccola guida 
del principiante 


Che cos’è un programma? 

11 solo computer non può compiere alcuna operazione. 

Un computer possiede potenzialità, ma, come una macchina 
senza benzina, senza un programma non può funzionare. 
La maggior parte dei programmi pubblicati su SUPER* 
COMMODORE per i computer Commodore sono scritti in 
un linguaggio per calcolatori chiamato BASIC. Il BASIC è 
facile da imparare ed è disponibile, di serie, nel vostro com¬ 
puter 

Programmi BASIC 

Ogni mese SUPERCOMMODORE pubblica programmi 
espressamente realizzati per il vostro computer. Tanto per 
cominciare, solo i programmi scritti per la tua macchina, 
indicati con “versione per ...”. Più tardi, quando avrai acqui¬ 
sito esperienza con il BASIC del tuo computer, potrai cerca¬ 
re di copiare e convertire programmi scritti per altri calcola¬ 
tori. Diversamente dal linguaggio corrente, che può essere 
variamente interpretato, il BASIC di solito ha un solo modo 
corretto per indicare qualcosa. 

Ogni lettera, carattere o numero ha il suo significato. 

Un errore banale è costituito dalla sostituzione del numero 
“0” con la lettera “O” oppure il carattere minuscolo “1” 
invece del numero “1” o ancora il carattere maiuscolo “B” 
con il numero “8”. 

Devi anche inserire tutta la punteggiatura, i due punti (:) e 
le virgole, copiando esattamente ciò che appare sulla rivista. 
Gli spazi possono essere importanti. Per essere sicuro copia 

il listato esattamente come si presenta. 

Le parentesi e i caratteri speciali 

L’eccezione per questa regola di copiatura si presenta quan¬ 
do incontrerai indicazioni tra parentesi, quali: “{GIÙ}”. 
Ogni cosa compresa tra parentesi è un carattere speciale 
oppure un carattere che non può essere facilmente prodotto 
con la stampante. Incontrando un carattere di questo tipo 
fai riferimento alla “Piccola guida per l’input dei program¬ 
mi”. 

Le istruzioni DATA 

Alcuni programmi contengono una sezione, o delle sezioni, 
di istruzioni DATA. Queste linee di istruzione forniscono le 
informazioni di cui il programma ha bisogno. 

In alcuni casi le istruzioni DATA costituiscono il programma 
vero e proprio, in altri contengono codici grafici. Queste 


linee sono particolarmente soggette agli errori. Se un solo 
numero in una linea di istruzione DATA è sbagliato, il calco¬ 
latore potrebbe “piantarsi” o distruggere il programma. La 
tastiera e il tasto STOP appaiono inattivi e lo schermo com¬ 
pletamente vuoto. Non lasciarti prendere dal panico. Non 
si è verificato alcun danno. 

Per riprendere il controllo devi spegnere il computer e suc¬ 
cessivamente riaccenderlo. Ciò cancellerà qualsiasi pro¬ 
gramma presente in memoria, per cui è sempre necessario 
fare il SAVE del tuo programma prima di comandare il 
RUN. 

Se il computer si ferma, puoi caricare (LOAD) il programma 
e cercare l’errore. 

A volte, quando il programma viene “lanciato”, un’istruzione 
DATA errata può causare un messaggio di errore. 

Il messaggio di errore potrebbe riferirsi alla linea di program¬ 
ma che legge (READ) il contenuto delle istruzioni DATA. 

Come conoscere il computer 

Dovresti prendere confidenza con il computer prima di pro¬ 
cedere alla copiatura del programma. 

Impara le istruzioni che si usano per memorizzare e richia¬ 
mare i programmi da nastro o da disco. Dovrai conservare 
una copia del tuo programma, se non vorrai copiarlo ogni 
volta che lo devi usare. Impara ad usare le funzioni di “edi¬ 
ting” della tua macchina. Come puoi correggere un errore? 
Puoi sempre ricopiare la linea e in questo caso devi sapere 
come procedere. Sapresti come inserire i caratteri in “inver¬ 
se”, i caratteri minuscoli e quelli di controllo? 

Tutto ciò è spiegato nel manuale del calcolatore. 

Un veloce ripasso 

1) Copia il programma una linea alla volta, con ordine. 
Premi RETURN alla fine di ogni linea. Usa il tasto “DEL” 
per correggere gli errori. 

2) Confronta la linea copiata con quella presente nella rivi¬ 
sta. Puoi controllare l’intero programma nel caso in cui 
si presenti un errore quando esegui il RUN. 

3) Accertati di aver inserito le istruzioni tra parentesi graffe 
con gli appropriati caratteri di controllo (fai riferimento 
alla “Piccola guida per l’input dei programmi” che trovi 
in questa stessa rivista). 

Siamo spiacenti di non poter rispondere singolarmente alle 
richieste di informazioni circa i programmi, prodotti o servizi 
apparsi su SUPERCOMMODORE. 
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Per collaborare a SUPERCOMMODORE 


La rivista è interessata ad articoli e programmi riguardanti la linea Commodore, di interesse 
generale, chiari ed esaurienti. Vi proponiamo una piccola “guida”, che ha particolarmente lo 
scopo di rendere più accurata la stesura dei vostri manoscritti: seguendo i nostri consigli si 
accresceranno le probabilità che le vostre buone idee e i vostri programmi vengano pubblicati. 


1 l’angolo superiore sinistro della prima pagina 
dovrà contenere: nome, cognome, indirizzo, 
numero telefonico, codice fiscale, data di spedi¬ 
zione, luogo e data di nascita. 

l’angolo superiore destro della prima pagina 
dovrà contenere la marca e il tipo di compu¬ 
ter al quale il lavoro si riferisce, unitamente ad 
eventuali espansioni di memoria o periferiche ri¬ 
chieste. 

il titolo dell’articolo, sottolineato, dovrà ini¬ 
ziare a circa due terzi in altezza della prima 
pagina. 

le pagine seguenti potranno essere battute 
normalmente, con la condizione che l’angolo 
superiore destro contenga un’abbreviazione del 
titolo e del cognome, unitamente al numero di 
pagina. Per esempio, Sprite Ed.../Brambilla/2, 
il testo dell’articolo dovrà essere battuto a 
macchina con interlinea di uno spazio e mez¬ 
zo, massimo due spazi; un margine di almeno un 
centimetro dovrà essere lasciato su entrambi i 
lati dello scritto. 

dovranno essere usati fogli in formato UNI 
A4 (cm. 21 x 29,7) e il testo, scritto in carat¬ 
teri maiuscoli e minuscoli, dovrà occupare una 
sola facciata del foglio. 

nel caso il testo comprenda più fogli, questi 
dovranno essere uniti con un fermaglio o con 
un punto metallico aperto. 

avendo intenzione di spedire più di un artico¬ 
lo, questi dovranno essere inviati separata- 
mente insieme alla rispettiva copia su supporto 
magnetico. 

programmi brevi (meno di 20 linee) potranno 
essere inseriti nel testo, mentre programmi 
iù lunghi dovranno essere listati separatamente. 
ESSENZIALE per noi disporre di una copia 
del programma registrata più volte su supporto 
magnetico, su entrambi i lati dello stesso. E prefe¬ 
ribile usare nastri di buona qualità e di lunghezza 
non eccessiva; la cassetta o il disco dovranno 
essere etichettati con il nome dell’autore, il titolo 
dell’articolo, il computer interessato e soprat¬ 
tutto le eventuali espansioni richieste. Come sug¬ 


gerimenti di programmazione si consiglia di usa¬ 
re le istruzioni “CHR$( x )”, “TAB( x )”, SPC( x 
)”, piuttosto che stringhe di manipolazione del 
cursore. 

Ad esempio, per uno scroll di 5 linee l’istruzione 
“FORI = 1T05:PRINT:NEXT”. è molto più in¬ 
terpretabile di 5 Q inverse; e, invece di una dozzi¬ 
na di simboli di cursore a destra, perché non 
usare semplicemente “PRINT SPC (12)”? Un ra¬ 
pido controllo dei programmi per operare queste 
sostituzioni sarà molto apprezzato da noi e dai 
lettori. 

per maggior chiarezza, aH’interno dell’ar¬ 
ticolo è conveniente usare caratteri maiu¬ 
scoli riferendosi a istruzioni BASIC (esempio RE¬ 
TURN, LIST, RND, PRINT ecc.). Se si desidera 
evidenziare una parola, è preferibile sottolinearla 
piuttosto che scriverla in carattere maiuscolo. 

gli articoli ed i programmi potranno avere 
qualsiasi lunghezza: da una routine di una 
sola linea fino a programmi molto complessi. 

volendo includere diapositive, queste do¬ 
vranno avere formato 24x36, o 6x6. 
non prenderemo in considerazione artico¬ 
li che siano stati sottoposti ad altre case 

editrici. 

il materiale non pubblicato non verrà re¬ 
stituito. 

il compenso per la collaborazione presta¬ 
ta sarà commisurato alla complessità e 
all’interesse del testo e/o del programma (da un 
minimo di L. 50.000 a un massimo di L. 
300 . 000 ). Il pagamento verrà effettuato in caso 
di pubblicazione del lavoro. 


Inviate idee e programmi a: 

SUPERCOMMODORE 
Viale Restelli, 5 
20124 Milano 

e saremo lietissimi di pubblicare i contri¬ 
buti migliori. 

La Redazione 
















Piccola guida per 
l’input 

dei programmi 


M olti dei programmi listati da SUPERCOMMODO- 
RE contengono particolari caratteri di controllo 
(controllo cursore, tasti colore, video-inverse, ecc.). 
Per rendere chiaro ciò che dev’essere battuto quando 
è necessario inserire uno dei suddetti caratteri sono 
state stabilite le seguenti convenzioni. 

Generalmente i listati contengono delle «parole» racchiu¬ 
se tra parentesi graffe { }; tali parole rappresentano 
particolari caratteri di controllo: j GIÙ } significa premere 
il simbolo del cursore verso il basso, j 5 SPAZI j vuol dire 
battere 5 volte la barra-spazio. 

Per indicare che un tasto dev’essere «shiftato», cioè 
premuto insieme al tasto SHIFT, nel listato il simbolo 
di questo tasto sarà sottolineato. 

Per esempio S significa che dev’essere premuto il tasto 
S mentre è abbassato il tasto SHIFT. 

La manovra farà apparire sullo schermo un piccolo 
«cuore». 

Trovando un simbolo sottolineato chiuso tra parentesi 
graffe (esempio { 10 N )) dovrà essere interpretato co¬ 
me «premere il carattere indicato per il numero di volte 
che lo precede nelle parentesi»: nel nostro esempio 
premere 10 volte il tasto N «shiftato». 

Se il tasto da premere è indicato tra le parentesi [()], 
vuol dire che lo stesso dovrà essere premuto mentre 
è premuto il tasto «Commodore» (il tasto «Commodo¬ 
re» è quello posto nell’angolo in basso a sinistra). 

Se il tasto scritto tra [()] è preceduto da un numero, 
ciò significa che il tasto dev’essere premuto per il nu¬ 
mero di volte indicato. 


Raramente si potrà trovare un carattere alfabetico soli¬ 
tario racchiuso tra parentesi graffe. Tale carattere può 
essere battuto mentre è premuto il tasto CTRL. 

Ad esempio { A ! sta ad indicare la sequenza CTRL-A. 
A proposito del «modo virgolette» è nota la possibilità 
di muovere il cursore sullo schermo con i tasti CRSR. 
Ogni tanto i programmatori desiderano muovere il cur¬ 
sore durante l’esecuzione del programma. È per que¬ 
sto motivo che nei programmi si troveranno dei j SIN j, 
|HOMEj e { BLU j. 

L’unico modo perché il calcolatore distingua il coman¬ 
do diretto da quello inserito nel programma è il «modo 
virgolette». Premendo il tasto «virgolette» (tasti SHIFT 
2) il calcolatore si predispone appunto in «modo virgo- 
lette». 

Battendo un carattere qualsiasi, cercando poi di cor¬ 
reggerlo muovendo il cursore, si otterrà solo un trat¬ 
to verticale in un quadratino inverso. Questo è infat¬ 
ti il simbolo del cursore a sinistra nel «modo virgolette». 
L’unico comando di editing non utilizzabile all’interno 
di un programma è il DEL. Battendo nuovamente le 
«virgolette» il calcolatore lascia il «modo virgolette». Si 
può accedere al «modo virgolette» quando inserite spa¬ 
zi nella linea. 

In ogni caso, il sistema più semplice per uscire dal 
«modo virgolette» è quello di premere il tasto RE¬ 
TURN. 

Utilizzare la tabella che segue quando è necessario 
inserire comandi relativi al cursore e ai tasti colore. 


Quando leggete: 

Premete: Vedrete: 

(CLR } 


G 

(HOME) 


0 

(sul 

LLil fiKiiuii 

□ 

(GIU’ } 

iiEnn 

E 

(SIN} 

ESSI H4:U:E 

II 

(DES) 


□ 

{RVS } 

rm q 

E 

{OFF} 

Enzi fi 

■ 

{ BLK } 

f -imi o 

■ 


Quando leggete: 

Premete: 

Vedrete: 

{CYN} 

tsm q 


{PUR} 

Ini 11 Q 

I 

{GRN } 

iroi □ 

□ 

{BLU} 

K4i.ll Q 

□ 

{YEL} 

K3H1 Q 

Ul 

[< 1> ] 

□ □ 

□ 

( < 2>] 

□ □ 

15 

t<3>] 

□ □ 


l<4>] 

□ □ 

E 


Quando leggete: 

Premete: 

Vedrete: 

[<7>] 

□ □ 

□ 

I<8>] 

□ □ 

■ ■ 
■ ■ 

{FI} 

m 

5 

{F2 } 

m 

a 

{F3 } 

tir 

5 

{F4 } 

m 

a 

{F5} 

ti-: 

ii 

{F6} 

fi! 

Si 

{F7} 

w 

■i 




VIC: espansioni dentro e inori 

Posseggo un VIC 20 con espansione di 
memoria da 16 Kbyte. Poiché sia sulla 
vostra rivista che su altre vengono spesso 
presentati tanto programmi che girano 
solo senza espansione quanto altri che 
invece la richiedono, vi vorrei domanda¬ 
re se esiste un sistema per evitare di do¬ 
ver continuamente inserire e disinserire 
questa espansione, con il conseguente lo¬ 
goramento dei contatti di connessione. 

Ernesto Chiari 

R. Ci sono due vie da seguire: la prima, 
più costosa, ma più comoda da usare è 
quella di acquistare presso un rivendito¬ 
re specializzato un apposito accessorio 
munito di un interruttore che permette 
di passare agevolmente dalla configura¬ 
zione di memoria espansa a quella ine¬ 
spansa. 

Un secondo sistema, senz’altro più eco¬ 
nomico, consiste nel simulare via soft¬ 
ware questo interruttore. Il seguente 
programma riporta la memoria del VIC 
20 nella sua configurazione normale ed 
inespansa: 

10 POKE44,16:POKE4096, 0 :POKE 
36869,240:POKE36866,!50 

20 POKE648,30:NEW 

Come si asa la funzione Tl$ 

Novello programmatore BASIC, ho letto 
sul manuale di istruzioni del computer 
che esiste una variabile riservata dal no¬ 
me TI$, che dovrebbe rappresentare un 
orologio. Non mi è tuttavia chiaro come 
utilizzare questa funzione, ad esempio 
per misurare il tempo di esecuzione di 
un programma. 

Francesco Rigoldi 

R. La variabile riservata TI$, disponibi¬ 
le su VIC 20, C64, C16 e Plus/4, costi¬ 
tuisce in effetti un orologio direttamente 
visualizzabile sullo schermo. Se si digita 

11 programmino di una linea: 

10 PRINT"[HOME]"TI$:GOTOl0 


si otterrà la visualizzazione, nell’angolo 
superiore sinistro dello schermo, del 
tempo trascorso dall’accensione del 
computer. Esso appare sotto forma di 
un numero di sei cifre, le prime due 
delle quali (partendo da sinistra) rap¬ 
presentano le ore, le seconde due i mi¬ 
nuti e le ultime due i secondi. TI$ è una 
variabile di stringa, e come tale può es¬ 
sere manipolata in qualunque modo si 
desidera. Ponendola uguale a una strin¬ 
ga composta da sei zeri, si resetta que¬ 
sto orologio in modo da far partire il 
conteggio del tempo dal momento desi¬ 
derato. 

Volendo sapere per quanto tempo è 
stato in esecuzione un certo program¬ 
ma, sarà sufficiente aggiungervi all’ini¬ 
zio ed alla fine le seguenti linee: 

1 TI$ = "000000": REM AZZERA 
L'OROLOGIO 

900 PRINT"[CLR]IL PROGRAM 
MA E'STATO IN ESECUZI 
ONE PER:" 

901 H$=LEFT$(TI$ , 2):M$=MI 
D$(TI$,3,2) : SS =RIGHT$ 

(TI $,2) 

902 PRINTHS" ORE" 

903 PRINTMS" MINUTI" 

904 PRINTSS" SECONDI" 

905 END 

Si tenga presente che le operazioni di 
Input/Output su cassetta e disco falsa¬ 
no leggermente il conteggio del tempo 
della funzione TI$. 

I misteri degli AND e degli OR 

Spesso vedo nei listati della vostra rivista 
la comparsa di istruzioni AND ed OR 
che mi suonano molto insolite. Riesco 
cioè a capire perfettamente istruzioni del 
tipo: 

10 IFA=10ORB=20THEN200 
oppure: 

10 IFA* 5ANDB= 7THEN300 
mentre non capisco quelle del tipo: 


10 POKE53265,PEEK(532b5J AND223 
oppure: 

10 POKK53265,PEEK(53265)OR32 
Potete spiegarmele? 

Emilio Esposito 

R. Gli AND ed OR rappresentano fun¬ 
zioni logiche e seguono, per stabilire il 
risultato di una operazione logica, parti¬ 
colari “tavole della verità”. Per esem¬ 
pio, la tavola della verità dell’istruzione 
AND è: 

vero AND vero = vero 
vero AND falso = falso 
falso AND vero = falso 
falso AND falso = vero 

I computer non possono trattare con¬ 
cetti filosofici come “vero” o “falso”, e 
ricorrono a una semplice schematizza¬ 
zione matematica. In un computer 
Commodore i bit posti a 1 rappresenta¬ 
no una condizione di vero, mentre i bit 
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posti a 0 rappresentano una condizione 
di falso. L’istruzione che le appare inso¬ 
lita sfrutta queste caratteristiche degli 
operatori logici, per modificare oppor¬ 
tunamente i bit voluti all’interno di una 
locazione di memoria (cioè all’interno di 
un byte). 

Si provi ad esempio a digitare PRINT- 
72AND45. Il risultato sarà 8; infatti: 

01001000 (72) 

AND 00101101 (45) 


00001000 ( 8 ) , 

11 risultato contiene un 1 solo nella posi¬ 
zione in cui entrambi i numeri hanno un 
1. 

L’OR dà un risultato vero, se uno od 
entrambi i due operandi sono veri. Ad 
esempio, PRINT720R45 darà come ri¬ 
sultato 109; infatti: 

01001000 (72) 

OR 00101101 (45) 


01101101 (109) 

Se un bit in uno dei due numeri è posto 
a 1, il risultato per quel bit sarà 1. Nelle 
istruzioni POKE di cui sopra vengono 
utilizzati gli operatori logici per porre a 
1 oppure a 0 un certo bit all’interno di 
un byte. Certe locazioni di memoria 
contengono infatti nei loro bit una serie 
di interruttori: può essere che il bit 1 
indichi se si è o meno in alta risoluzione 
(valore l=alta risoluzione, valore 0=mo- 
do normale), il bit 2 indichi se è stato 
premuto il pulsante di fuoco sul 
joystick (valore l=si, valore 0=no) e 
così via. Facendo in queste locazioni 
una POKE con il valore restituito dalla 
PEEK, e confrontato con AND od OR 
con un numero opportuno, si è in grado 
di modificare a piacere un certo bit, la¬ 
sciando inalterati gli altri, oppure inver¬ 
tire tutti i valori dei bit, ecc. 

Suonerà molto complicato, come tutti i 
problemi che richiedono un approccio 
attraverso la numerazione binaria, ma 
con un po’ di esperimenti è facile acqui¬ 
sire la tecnica per modificare solo il bit 
desiderato di una certa locazione di me¬ 
moria. 
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OK-LIST 

S appiamo tutti quanto sia difficile di¬ 
gitare correttamente un programma 
(ovviamente, se non si dispone della 
cassetta allegata a SUPERCOMMO- 
DORE!). Errori di battitura anche banali 
possono provocare il malfunzionamento 
del programma stesso, o anche il blocco 
completo del sistema, obbligandoci a ri¬ 
fare il lavoro. 

Ma il punto di forza dei calcolatori è che 
essi eccellono nei compiti noiosi e che 
richiedono precisione. Scoprire un erro¬ 
re nella battitura di un listato è appunto 
un compito noioso, quindi perché non 
sfruttare il tuo computer per controllare 
i_ listati da te digitati? 

E proprio questo lo scopo di OK-LIST, 
il programma che ti permetterà di ri¬ 
sparmiare tempo e fatica. Annidato al¬ 
l’interno del tuo computer, OK-LIST 
controlla automaticamente ogni riga 
battuta, mostrandoti un numero in cima 
allo schermo ogni volta che premi il ta¬ 
sto RETURN. Un numero corrisponden¬ 
te nel listato del programma pubblicato 
ti permette il confronto, ed uno sguardo 
è sufficiente per avere la conferma di 
aver digitato la linea correttamente. 
OK-LIST è un breve programma in lin¬ 
guaggio macchina residente nel buffer 
del registratore. Esso rimane in tale zo¬ 
na finché spegni il computer o usi l’unità 
a cassette. 

Come digitare OK-LIST 

Vi sono due versioni di OK-LIST, una 
per VIC 20 e l'altra per C16 e Plus/4. 
Digita la versione adatta al tuo compu¬ 
ter, facendo attenzione a non commet¬ 
tere errori (per fortuna il listato è molto 
breve!). Dopo aver finito salvalo su di¬ 
sco o nastro, per lo meno un paio di 
volte, prima di mandarlo in esecuzione 
con il comando RUN, perché il pro¬ 
gramma BASIC, dopo aver memorizza 
to la routine in linguaggio macchina (le 
istruzioni DATA), si autocancella. 

Come si usa OK-LIST 

A questo punto puoi iniziare a battere 
il tuo primo listato “a prova di errore”. 
Se non hai OK-LIST in memoria, carica¬ 
lo e attivalo con RUN. 

Digita quindi la prima linea di program¬ 
ma: come puoi vedere, in fondo ad essa 
c’è la parola “:rem” seguita da un nu¬ 
mero, che si chiama checksum. 

NON COPIARE QUESTA PARTE 
DELLA LINEA! Ora premi il tasto RE¬ 
TURN, come al solito. In alto a sinistra 
apparirà il checksum; confrontalo con 
quello che vedi scritto sulla rivista dopo 
“:rem”. Se i due numeri sono uguali, 
vuol dire che la linea è stata digitata 
correttamente, altrimenti controllala, 
perché evidentemente hai commesso 
un errore. Facile, no? 

OK-LIST non è pignolo per quel che 
riguarda gli spazi bianchi, dato che non 
fa caso alla loro presenza. Ciò torna a 
tuo vantaggio, dal momento che la spa¬ 


ziatura non è, in genere, importante. 
Ma all’interno delle istruzioni PRINT gli 
spazi spesso si rivelano necessari, quin¬ 
di presta attenzione quando digiti que¬ 
sto tipo df istruzione. Un’altra cosa a 
cui devi badare è che usando le forme 
abbreviate dei comandi (ad esempio ? 
per PRINT) il checksum visualizzato 
non coinciderà con quello presente sul 
listato. Ciò è tuttavia risolvibile, pre¬ 
mendo il tasto RETURN su una linea 
dopo averla listata: le abbreviazioni sa¬ 
ranno ricodificate nella loro forma inte¬ 
ra e quindi OK-LIST sarà in grado di 
svolgere perfettamente la sua funzione. 
In questo modo, inoltre, avrai la possibi¬ 
lità di controllare interi gruppi di righe 
in una volta sola. 

Ovviamente, nessuno è perfetto, ed an¬ 
che OK-LIST ha qualche limite, se per 
caso ti capitasse (ma è un errore poco 
frequente) di “anagrammare” durante 
la digitazione una linea (per esempio 
invece di battere 10 PRINT"VAI”, digiti 
per errore 10 PRINT“VIA”), OK-LIST 
non se ne accorgerebbe. Inoltre la pre¬ 
senza del carattere SHIFT-SPAZIO mo¬ 
difica il numero di checksum rispetto al 
carattere SPAZIO normale, anche se la 
differenza non risulta visibile sul video 
del tuo computer. 

Se intendi sospendere il lavoro di digita¬ 
zione - o lo hai terminato - puoi salva¬ 
re su nastro o disco il tuo programma: 
ricordati comunque di premere RUN/ 
STOP e RESTORE su VIC 20, oppure 
RUN/STOP e RESET su C16 e Plus/4 
prima di dare il comando SAVE. Al mo¬ 
mento di riprendere il lavoro, tuttavia, 
non potrai più utilizzare OK-LIST, dal 
momento che qualsiasi operazione su 
cassetta lo distrugge. 

Se vuoi disabilitare OK-LIST in qualun¬ 
que momento, senza perdere il tuo pro¬ 
gramma in memoria, premi RUN/ 
STOP e RESTORE su VIC 20 oppure 
RUN/STOP e RESET su C16 e P!us/4. 
Per riattivarlo batti: 

SYS 886 
Buon lavoro! 


OK-LIST 

versione per Vie 20 

tO PRINT"(CLR}ATTENDERE PREGO... 

i» 

11 FORI«886T01013 :READA:CK»CK+A: 
POKEI, A :NEXT 

12 IF CKOl 7539 THEN PRINT” 

(GIU'iERRORE NELLE ISTRUZIONI 

DATA": END 

13 SYS886:PRINT"ICLR)( '2 GIU'lOK 
-LIST ATTIVATO.":NEW 

14 DATAI 73,036,003,201,1 50,208 

15 DATA001,090,141,151,003,173 

16 DATA0J7,003,141 ,1 52,003,169 

17 DATAI 50,141,036,003, 169,003 

18 DATA141,037,003,169,000,133 

19 DATA254,096,032,087,241 ,133 

20 DATA251,134,252,132,253,008 

21 DATA201,013,240,017,201,032 

22 DATA240,005,024,101,254,1 33 



23 OATA2 34,165,251 ,166,252,164 

24 DATA253,040,09b,169,013,032 

25 DATA210,255,1bb,214,141,251 

26 DATA003,206,251,003,169,000 

27 DATAI 33,216, 169,01 9,032,210 

28 DATA255,169,018,032,210,255 

29 DATA169,058,032,210,255,166 

30 DATA254,169,000,133,254,172 

31 DATAI 51,003,192,087,208,006 

32 DATA032,205,189,076,235,003 

33 DATA032,20b,221,169,032,032 

34 UATA210,255,032,210,255,173 

35 DATA251,003,I33,214,076,173 

36 DATA00 3 


OK-LIST 

versione per C16 e Plus/4 

10 PRINT"(CLR(ATTENDERE PREGO _ 

11 FORI=88bTOl018 :READA:CK*CK + A: 
POKEI,A:NEXT 

12 IFCK< >14 714THENPRI NT”|GlU' )ER 
RORE NELLE ISTRUZIONI DATA" : E 
ND 

13 SYS886 : PRINT”(CLR t( 2 GIU'lOK 
-LIST ATTIVATO.":NEW 

14 DATA173,034,003,201,150,208 

15 DATA001,096,141 , 151,003,173 

16 DATA035,003,141 , 1 52,003, 1 69 

17 DATA1S0,141,034,003,169,003 

18 DATAI 41 , 035,003, 1 69,000, 1 33 

19 DATA006,09b,032,232,235,133 

20 DATA003,134,004 ,1 32,005,008 

21 DATA201,013,240,017,201,032 

22 DATA240,005,024,101,006,133 

23 DATA006,165,003,1 66, 004 , 1 b4 

24 DATA005,040,096,169,013,032 

25 DATA210,255,165,205,1 41, 251 

26 DATA003,206,251,003,169,000 

27 DATAI 33,207, 169,019,032,210 

28 DATA255 , 169,018,032,210,255 

29 DATAI 69,058,032,21 0,255, 166 

30 DATA006,169,000,133,006,1 72 , 

31 DATAI 51 , 003,1 92,232, 208,OOb 

32 DATA032,095,164,076,235,003 

33 DATA032,007,208, 169,032,032 

34 DATA2 10,255,032,210,255,173 

35 DATA251,003,133,205,076,173 

36 DATA003 
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I sistemi di protezione a parola 
chiave per i programmi Basic 

di S. K. Smith 

trad. ed adatt. 

di S. Colombo 



I servizi di telecomunicazione, 
le banche e in generale tutti quei 
servizi di informatica accessibili 
al pubblico che possono conte¬ 
nere informazioni riservate ri¬ 
chiedono all’utente una parola 
chiave per poter accedere al ser¬ 
vizio. 


A nche il programma BASIC può desi¬ 
derare di proteggere il proprio data¬ 
base con un sistema a parola chiave, in 
modo da non permettere la lettura dei 
propri dati a persone non autorizzate. 
La protezione a parola chiave usa siste¬ 
mi molto diversi da quelli abitualmente 
impiegati per protezioni contro la dupli¬ 
cazione abusiva dei programmi: rag¬ 
giunta di routine di controllo di parole 
chiave non interferisce in alcun modo 
con il LOAD o il SAVE di un program¬ 
ma. Altri utenti potranno quindi tran¬ 
quillamente copiare il programma pro¬ 
tetto da parola chiave anche se, non 
conoscendola, non saranno in grado di 
farlo girare correttamente (a meno che, 
naturalmente, si tratti di programmatori 
smaliziati, in grado di eliminare la prote¬ 
zione). 

Una semplice parola chiave 

Il sistema più ovvio è talmente semplice 
da risultare utilizzabile solo come prote¬ 
zione dall’uso del programma da parte 
di bambini molto piccoli, o da chi non 
abbia la benché minima conoscenza del¬ 
la programmazione in BASIC. Suppo¬ 


nendo di aver scelto “PIPPO” come pa¬ 
rola chiave, sarà sufficiente aggiungere 
al programma le seguenti linee: 

10 INPUT"PAROLA CHIAVE";A$ 

20 IPA$<>"PIPPO"THENPRINT"PAROLA 
RIFIUTATA":GOTO10 

Chiamiamola routine di “livello 1”: 


l’utente inserisce una variabile di strin¬ 
ga A$, ed il programma la confronta 
con la stringa “PIPPO”. Se il risultato 
del confronto è negativo, il programma 
ritorna alla linea 10, richiedendo nuova¬ 
mente la parola chiave. Naturalmente, 
è possibile sostituire l’istruzione GO- 
TOIO con un NEW per cancellare il 
programma dalla memoria nel caso la 
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parola chiave sia errata. 

Il problema più ovvio è che se qualcuno 
lista il programma, è perfettamente in 
grado di leggere la parola chiave in li¬ 
nea 20. Occorre quindi inibire il listing 
per nascondere la parola chiave. 

Inibire il listing 

Alcuni sistemi di protezione contro il li¬ 
sting di un programma sono già stati 
analizzati sul numero di Marzo di questa 
rivista. Vediamone qui qualcun altro. 
L’inserimento di caratteri shiftati in una 
istruzione REM può dare strani risultati: 
per esempio, REM [SH1FT+F] verrà li¬ 
stato come REM ASC. Molti caratteri 
shiftati vengono infatti interpretati dal 
computer, con il LIST, come parola 
chiave del BASIC. 

Uno di questi caratteri shiftati ha un 
effetto particolarmente curioso: 
SHIFT+L dopo una REM fa fermare il 
listing di un programma con la stampa 
del messaggio “7SYNTAX ERROR”. 
Aggiungete questa linea al programmi¬ 
no visto precedentemente: 

15 REM L 


La L sottolineata, con l’abituale codifica 
usata dalla nostra rivista, equivale a 
SHIFT+L. 

Se vi trovate in modo maiuscolo/ 
minuscolo, la L shiftata apparirà come 
una L maiuscola, mentre se siete in mo¬ 
do maiuscolo/grafico, la L shiftata ge¬ 
nererà il carattere grafico serigrafato 
sulla parte anteriore destra del tasto L. 
Digitate LIST, ed otterrete la visualizza¬ 
zione delle sole linee 10 e 15. Il listing 
si interrompe con un “7SYNTAX ER- 
ROR”. (“En passant”, se usate 
SHIFT+L come codice 1D di un disco, 
avrete la sua directory non listabile). 

A questo punto un eventuale "sprotet- 
tore” appena un po’ furbo può fare due 
cose: dal momento che la linea 15 è 
marcatamente la causa del problema, 
può semplicemente digitare LIST16-: 
ecco lì la parola chiave ben in vista! 
Oppure, può semplicemente cancellare 
dal programma la linea 15, e tutto ridi¬ 
venta perfettamente listabile. 

Un’ idea per confondere le idee a que¬ 
sto “sprotettore” in erba potrebbe con¬ 
sistere nel fare in modo di cambiare con 
qualche artificio il numero visualizzato 
di linea della REM , tale che essa, pur 
rimanendo per il computer la linea 15, 
appaia nel listato con un altro numero 
di linea. 

Un falso numero di linea 

Andate con il cursore su una riga vuota, 
premete il tasto SH1FT e contempora¬ 
neamente premete il tasto INST/DEL. 
Il tasto INSERT che avete premuto 
(cioè SHIFT+INST/DEL) vi pone in 
modo “insert”, che è praticamente iden¬ 
tico nel comportamento al modo virgo- 
lette, con una sola differenza: nel modo 
virgolette la pressione del tasto DEL 
provoca la cancellazione del carattere 


a sinistra del cursore, mentre in modo 
insert la pressione di questo tasto pro¬ 
voca l’apparizione di una T in campo 
inverso. Ecco come inserire dei caratte¬ 
ri di DEL in un’istruzione REM: 

1. Digitate 15 REM”" (si noti che il tasto 
con le virgolette va premuto due volte). 

2. Premete una volta il tasto INST/DEL 
per cancellare le ultime virgolette. 

3. Premete CTRL contemporaneamen¬ 
te al tasto 9 (operazione coincidente 
con RVS ON), e quindi premete sette 
volte il tasto T. 

4. Digitate, a seguire, 30 REM”, quindi 
premete SHIFT ed L contemporanea¬ 
mente. 

Le T in campo inverso agiscono come 
caratteri DEL e cancellano i primi sette 
caratteri durante il LIST. Viene quindi 
stampata la scritta 30 REM. Dando il 
LIST al programma si potrà quindi pen¬ 
sare che sia la linea 30 a seguire la linea 
10, mentre in realtà si tratta della linea 
15. Un utente non autorizzato che cer¬ 
chi di listare con LIST30-, o cerchi di 
cancellare la linea 30, non potrà legge¬ 
re la parola chiave contenuta in linea 
20 . 

Passiamo ora a un diverso tipo di pro¬ 
gramma con parola chiave. 

Giocare con i link di linea 

Le linee BASIC sono contenute nella 
memoria del computer in base a regole 
ben definite. Un certo numero di PEEK 
potrà rivelarci quali siano queste rego¬ 
le. Per prima cosa digitate NEW ed in¬ 
serite questa linea: 10 REMAB. Ora di¬ 
gitate, senza numero di linea, quanto 
segue: 

B=PEEK(43)+256* PEEK(44):FORI=BTO 
B+ 9:PRINTI ,PEEK(I):NEXT 

Le locazioni 43 e 44 sono i puntatori 
alla prima locazione di memoria usata 
dal BASIC: 43 contiene il suo byte bas¬ 
so, e 44 il suo byte alto. Dopo aver 
premuto RETURN vedrete sullo scher¬ 
mo i seguenti numeri: 


tra linea BASIC in memoria, questa 
conterrebbe quindi il suo indirizzo di link 
nelle locazioni 4105 e 4106. 

I link di linea funzionano puntandosi a 
vicenda: il primo punta al secondo, il 
secondo al terzo e così via. Si troverà 
inoltre sempre uno zero tra due linee, 
proprio nella locazione precedente il by¬ 
te basso dell’indirizzo di link di una li¬ 
nea. L’ultima linea del programma pun¬ 
ta al primo di una coppia di zeri, in 
modo che tre zeri consecutivi indicano 
la fine di un programma. L’inserire degli 
zeri nel primo link dì linea impedirà agli 
utenti non autorizzati del programma 
sia il LIST che il RUN del programma 
stesso, a meno che vengano digitate op¬ 
portune POKE, che in questo caso assu¬ 
mono la funzione di parola chiave. 

Per passare alla pratica, provate a cari¬ 
care in memoria un programma che de¬ 
siderate proteggere in questa maniera, 
quindi seguite questa procedura: 

1. Listate il programma per essere sicuri 
che si trovi in memoria. 

2. Digitate B=PEEK(43)+256*PEEK(44): 
PRINTB. Annotatevi il numero che verrà 
visualizzato. 

3. Digitate PRINTPEEK(B),PEEK(B+1) 
ed annotatevi i due numeri visualizzati. 

4. Digitate POKEB,0:POKEB+1,0. Quin¬ 
di date il LIST. 

II programma apparentemente se n’è 
andato. Potete comunque salvarlo su 
nastro o disco perché è naturalmente 
ancora in memoria, anche se invisibile. 
Saranno sufficienti due POKE per riot¬ 
tenere il programma lìstabile ed esegui¬ 
bile. Se chiamiamo rispettivamente A il 
primo numero che avete annotato, B il 
secondo e C il terzo, potrete digitare: 

POKEA/B:POKEA+1,C 
e tutto ritornerà normale. 

Una parola chiave nnmcrlca 

Ci sono un paio di variazioni per perfe¬ 
zionare questa tecnica: digitate NEW, 
seguito da questo programma: 


4097 9 byte basso del link 

4098 16 byte alto del link 

4099 10 byte basso numero linea 

4100 0 byte alto numero linea 

4101 143 codice token della REM 

4102 65 valore ASCII di A 

4103 66 valore ASCII di B 

4104 0 byte di fine linea 

4105 0 due zeri di fine programma 

4106 0 


Un numero in formato byte basso/byte 
alto può essere letto per esteso con la 
formuletta: 


PRINT(byte basso)+(byte alto)*256 

Il link punta all’inizio della lìnea BASIC 
successiva. Poiché il byte basso del link 
è 9, e quello alto è 16, l'indirizzo di link 
sarà 9+16*256=4105. Se ci fosse un’al¬ 


10 PRINT"PAROLA CHIAVE":INPUTS,L 
«H:POKES,L:POKES+1,H 
20 PRINfCIAO? 


Listatelo, per assicurarvi che sia effetti¬ 
vamente in memoria. Quindi digitate la 
seguente linea in modo diretto: 


B-PEEK(43)+256*PEEK(44):FORJ=B+5 
TOB+80:PRINT-J*(PEEK(J-1)-0); : NE 
XT 


Lo schermo si riempirà con molti zeri 
frammisti ad altri numeri. Annotatevi il 
primo numero diverso da zero e chia¬ 
miamolo locazione chiave. Poniamo che 
esso sia 4138 (se fosse un numero di¬ 
verso, usate quello). Ciò significa che il 
link alla linea successiva (linea 20) si 
trova nelle locazioni 4138-4139. 
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Ora digitate PRINTPEEK(4138), PEEK 
(4139) ed annotatevi i due numeri vi¬ 
sualizzati. Poniamo che essi siano 57 e 
16. Date ora POKE4138,0:POKE 4139, 
0 (ricordate di non usare questi numeri, 
se la vostra locazione chiave è diversa). 
Il porre a zero gli indirizzi di link rende 
il listing impossibile dopo la linea 10: pro¬ 
vate a dare il LIST! 

Se conoscete la parola chiave di tre nu¬ 
meri, potrete invece avere accesso al¬ 
l’intero programma. Nell’esempio fatto 
date il RUN e digitate come risposta 
all’INPUT 4138,57,16. Tutto ritornerà 
normale. 

Un prognaaa infinito 

Ricordate che le locazioni 43 e 44 pun¬ 
tano al primo link di linea, ed il primo 
link di linea punta al secondo. Che suc¬ 
cederà se facciamo in modo che il primo 
link di linea punti a se stesso? Provia¬ 


mo. Digitate NEW ed inserite questo 
breve programma: 

10 ROt PRIMA LINEA 
20 REM SECONDA LINEA 

Digitate quindi in modo diretto: 

B=PEEK(43)4256*PEEK(44)sPRINTB.P 
,EEK(B) , PEEK(B+l ) 

Annotatevi i tre numeri e digitate: 
POKEB , PEEK(43)SPOKEB+1,PEEK(44) 
Ora la prima linea punta su se stessa. 
Date il LIST e vedrete visualizzata al¬ 
l’infinito la linea 10. Dopo aver infatti 
listato la prima linea il computer cerca 
in memoria e legge il link alla seconda 
linea. Dal momento che abbiamo fatto 
in modo che il link punti su se stesso, 
la prima linea verrà listata all’infinito. 
Per riottenere il programma corretto ri¬ 
pristinate il link originario, “pokando”, 
come visto prima, i numeri che vi siete 


annotati. Come visto all’inizio dell’arti¬ 
colo, una REM seguita da particolari 
caratteri può rendere una linea invisibi¬ 
le a chiunque cerchi di listarla. Se si usa 
questo sistema per rendere invisibile la 
prima linea e quindi le si modifica l’indi¬ 
rizzo di link per fare in modo che punti 
su se stessa, il comando LIST sembrerà 
disabilitato. Il computer stamperà infat¬ 
ti una serie infinita di linee invisibili. 
Una combinazione delle tecniche esami¬ 
nate può essere in grado di proteggere 
i vostri programmi da un buon numero 
di occhi troppo curiosi. Tenete conto 
tuttavia che ad ogni tecnica di protezio¬ 
ne corrisponde una tecnica di sprotezio¬ 
ne altrettanto sofisticata, e che le mi¬ 
gliori tecniche di protezione ricorrono 
totalmente al linguaggio macchina e 
possono addirittura essere ancora piti 
complicate dello stesso programma da 
proteggere. 


Allineatore professionale 
per registratori Commodore 


Il registratore a cassetta è sicuramente 
la periferica più comune fra tutti gli 
utenti di personal e home computer; in 
questi ultimi tempi l’uscita sul mercato 
di parecchi programmi “velocizzatori” 
(i famosi turbo) ha reso questa periferi¬ 
ca ancora più attuale, portandola ad 
avere tempi di caricamento tipici di un 
floppy disk. 

Spesso, però, leggendo cassette incise 
con il sistema turbo si incontrano delle 
difficoltà, dovute per la maggior parte 
al non perfetto allineamento della testi¬ 
na di lettura del registratore. 

Per ovviare a questo inconveniente la 
LEONI INFORMATICA di Milano ha 
ideato un kit per l’allineamento e la puli¬ 
zia del registratore Commodore. 

Il kit si compone di una cassetta di puli¬ 
zia, una interfaccia per effettuare l’alli¬ 
neamento, una cassetta master di riferi¬ 
mento, un cacciavite e un master reset. 
Prima di descrivere l’uso di questa in¬ 
terfaccia per allineare il registratore ve¬ 
diamo cosa significa avere un registra¬ 
tore “disallineato” e quali sono i proble¬ 
mi che ciò Comporta. 

Il nastro di una cassetta (anche musica¬ 
le) è idealmente diviso in strisce dispo¬ 
ste nel senso della lunghezza: su ognuna 
di queste strisce viene registrata una 
diversa informazione. Pensate infatti a 


una registrazione stereofonica: in così 
poco spazio si trovano ben quattro in¬ 
formazioni separate, relative ai canali 
destro e sinistro dei due lati. 

Per una lettura perfetta di tutte le trac¬ 
ce occorre quindi che la testina sia per¬ 
fettamente in linea con il nastro, affin¬ 
ché le parti che leggono il nastro (trafer¬ 
ri) siano posizionate esattamente sul 
punto del nastro in cui è presente la 
traccia voluta. 

Se questo non succede, la testina legge¬ 
rà una zona del nastro vicina a quella 
ottimale, perdendo così parte del se¬ 
gnale inciso. 

L’inconveniente si manifesta in una at¬ 
tenuazione del segnale sulle frequenze 
più alte, anche per piccolissimi sposta¬ 
menti, e questo è il motivo per cui sì 
manifestano problemi con i nastri incisi 
con programmi “turbo”. 

Per velocizzare il caricamento dei pro¬ 
grammi vengono infatti modificate (rad¬ 
doppiate!) le frequenze di registrazione 
e il punto di allineamento diventa quindi 
estremamente critico. 

Il kit proposto dalla LEONI INFORMA¬ 
TICA vi consentirà di controllare e cor¬ 
reggere periodicamente l’allineamento 
del vostro registratore in modo davvero 
molto semplice e sicuro. 

Il nastro master e il sistema usato dal¬ 


l’interfaccia di allineamento è lo stesso 
adoperato a livello professionale negli 
studi di registrazione, e garantisce quin¬ 
di i migliori risultati. 

Il concetto di funzionamento è semplice: 
sul nastro master sono registrate alcune 
informazioni a frequenza medio-alta che 
vengono poi lette dall’interfaccia, che 
segnala con l’accensione del diodo LED 
una qualsiasi anomalia nella rilettura 
del nastro, quali abbassamento del se¬ 
gnale, decadimento delle alte frequen¬ 
ze, non uniformità di trascinamento, 
ecc. 

Alcune di queste anomalie (calo alle al¬ 
te frequenze) possono anche dipendere 
dalla non perfetta pulizia delle parti a 
contatto con il nastro; per questo si con¬ 
siglia sempre di effettuare prima un 
passaggio con la cassetta di pulizia for- 
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nita nel kit. 

Questa cassetta va inserita normalmen¬ 
te nel registratore e va “letta” per qual¬ 
che secondo. Il nastro non deve mai 
essere riavvolto, dato che lo sporco ri¬ 
mane depositato sul nastro stesso. 
Dopo questa semplice operazione si 
procede con l’allineamento vero e pro¬ 
prio; collegate l’interfaccia al C64 e il 
registratore all’interfaccia, inserite la 
cassetta master e premete il tasto 
PLAY del registratore. 

Il diodo LED indica lo stato di allinea¬ 
mento della testina: quando risulta per¬ 
fettamente spento il registratore è alli¬ 
neato e non lamenta altri inconvenien¬ 
ti. 

Se il LED al contrario rimane acceso, 
occorre intervenire sulla vite di regola¬ 
zione della testina, posta in corrispon¬ 


denza del tasto REWIND (riavvolgimen¬ 
to). 

Spostando di poco la vite, si deve otte¬ 
nere lo spegnimento del LED, che deve 
rimanere spento per una zona equiva¬ 
lente circa ad un quarto di giro. 

Può capitare a volte di non riuscire a 
spegnere completamente il LED. Se ri¬ 
mane acceso a luminosità molto bassa 
e costante, si può comunque considera¬ 
re il registratore allineato e ricercare il 
difetto o nella testina (usurata o sporca) 
o nella meccanica non più affidabile. 
Se invece il LED tende ad accendersi 
in modo casuale, con luce più o meno 
intensa, il difetto è da imputare a un 
trascinamento del nastro a velocità non 
costante. 

Se usate spesso il registratore, è consi¬ 
gliabile procedere periodicamente alla 


taratura dell’apparecchio, dato che 
l’uso stesso del registratore tende a 
spostare la testina dal punto ottimale di 
lavoro. 

Tutte le operazioni di taratura possono 
essere effettuate senza bisogno di 
smontare il registratore, anche se consi¬ 
gliamo ai più esigenti di operare a regi¬ 
stratore aperto: questo infatti consente 
di fissare con una goccia di vernice la 
vite che regola la testina, dopo averne 
trovato la giusta posizione. 


Il kit di alliacaMcnto tcstiac vie¬ 
ne distribaito dalla à.»oft, e paò 
qaiadi essere ordiaato diretta- 
mente al prezzo di L. 64.900 
(IVA coaspresa) atilizzaado il 
coapoa sottoriportato. 
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Le novità deirultimo Consumer 
Electronic Show 



adattamento da un articolo 

di G.Marano 

Gli Stati Uniti, come sempre polo 
trainante dell'economia mondia¬ 
le, rappresentano anche la fuci¬ 
na per le ultime novità nel setto¬ 
re informatico. Vediamo una 
rassegna delle macchine più in¬ 
teressanti presentate all'ultimo 
Consnmer Electronic Show di 
Chicago. 

In casa Commodore, oltre all’ovvio 
CI28 di cui abbiamo già avuto occasio¬ 
ne di parlare diffusamente, particolar¬ 
mente interessanti le sue nuove periferi¬ 
che, come il dual drive 1572, il mouse 
collegabile alla porta joystick, la stam¬ 
pante “near letter quality” MPS 1000. 
Interessante anche una versione di 
C128 diversamente “carrozzata”, in sti¬ 
le IBM con disk drive incorporato e ta¬ 
stiera separata, chiamata CI280 e dal 
costo approssimativamente uguale a 
quello del C128 con disk drive. 

La novità più interessante presentata 
dalla Commodore è tuttavia il C900, 
dotato di microprocessore Z8000 con 
sistema operativo Coherent UNIX com¬ 
patibile; dotato dell’ottima risoluzione 
di 1024 per 800 pixel, gestione a fine¬ 
stre e menu a scomparsa controllati da 
mouse (Macintosh docet...), dovrebbe 
essere commercializzato con una confi¬ 
gurazione standard di memoria di 512 
Kbyte, un drive per floppy da 5.25 pol¬ 
lici con capacità di immagazzinamento 
dati di 1.2 Mbyte, un disco rigido da 20 
Mbyte, un monitor monocromatico ad 
alta risoluzione, un mouse, ovviamente 
il sistema operativo UNIX compatibile, 
un compilatore business BASIC ed un 
compilatore C, 50 programmi di utilità, 
quattro interfacce di cui due RS-232, 
una Centronics ed una IEEE 488. Il tut¬ 
to - pare - per meno di dieci milioni. 
Non presenti invece alla rassegna il 
Commodore LCD portatile con scher¬ 
mo piatto a cristalli liquidi (di cui si è 
parlato sul numero scorso) ed il Com¬ 


modore Amiga: evidentemente i proto¬ 
tipi non si trovano ancora nello stadio 
finale dello sviluppo, anche se dovrebbe 
mancare ormai pochissimo tempo alla 
loro presentazione ufficiale. 

Ricordiamo che il Commodore Amiga 
dovrebbe essere un computer alquanto 
rivoluzionario, dotato di microprocesso¬ 
re Motorola 68000, 256 Kbyte RAM 
espandibile a 512 Kbyte, sistema ope¬ 
rativo “Macintosh-style”, drive a doppia 
faccia da 800 Kbyte, monitor a colori 
RGB incorporato, grafica in alta risolu¬ 
zione con ben 4096 colori disponibili. 
Tra le sue periferiche più interessanti 
dovrebbero essere presentate un’inter¬ 
faccia per il collegamento con un video¬ 
registratore, una telecamera o un video¬ 
disco, che permette di miscelare le im¬ 
magini filmate con quelle generate dal 
computer. 

Di altre case produttrici è interessante 


segnalare un’interfaccia per il collega¬ 
mento di una telecamera al C64 e, sem¬ 
pre per il C64, un disco rigido da 10 
Mbyte con una velocità di accesso ai 
dati 43 volte superiore a quella del 
1541. 

Principale concorrente della Commodo¬ 
re, soprattutto sul mercato americano, 
è la Atari, recentemente acquistata dal- 
l’ex-maggior azionista della Commodo¬ 
re, Jack Tramiel. 

Oltre a novità per la serie XE nel campo 
delle periferiche, novità anche per le 
serie ST, di cui abbiamo parlato sullo 
scorso numero. Pare infatti che il 
130ST non verrà prodotto, e verrà in¬ 
vece sostituito dal 260ST con 256 Kby¬ 
te di RAM e disco con microfloppy da 
500 Kbyte incorporato nello chassis. 
Nessuna variazione invece per il 520ST 
da 512 Kbyte, che rimane il fratello 
maggiore del 260ST. Sia il 260ST che 
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il 520ST dovrebbero essere venduti in¬ 
sieme a due programmi compresi nel 
prezzo, un word processor molto evolu¬ 
to ed un programma di grafica tipo il 
MacPaint del Macintosh. 

Piuttosto nebulose invece le novità in 
casa MSX: evidentemente lo scarso suc¬ 
cesso fino ad ora ottenuto dallo stan¬ 
dard nippo-americano, sia sul mercato 
statunitense che su quello europeo, ha 
lasciato un po’ spiazzate le aziende pro¬ 
duttrici. 

Al Consumer Electronic Show erano 
presenti soltanto quattro marche MSX, 
delle quali la più interessante era sicura¬ 


mente Spectravideo, che presentava il 
nuovo Express. 

Si tratta di un computer esternamente 
molto simile all’Apple Ile, con 64 Kbyte 
RAM, sistema operativo MS-DOS e 
CP/M 2.2, e quattro programmi appli¬ 
cativi: il suo costo dovrebbe aggirarsi 
sul milione e mezzo. 

Gli sviluppi futuri dei sistemi MSX sono 
tuttavia ancora molto incerti, in quanto 
si parla sia del nuovo standard MSX2, 
dotato di drive e nuovo microprocesso¬ 
re video, sia del nuovo standard cosid¬ 
detto Super MSX basato sul micropro¬ 
cessore 68000 con 128 Kbyte RAM. 


Le aziende produttrici di MSX si sono 
accorte di aver realizzato con gli MSX 
attuali un prodotto già superato, e stan¬ 
no correndo ai ripari, anche se per ora 
non è ancora dato sapere quali saranno 
le loro scelte finali. 

Nel settore software per home e perso¬ 
nal, ovviamente, la maggior gamma di 
prodotti è destinata a “girare" su C64, 
Apple li ed Atari, anche se in modo 
abbastanza sorprendente non vengono 
trascurati computer ormai non più in 
produzione da diverso tempo, quali il 
Texas Instruments TI 99/4A, l’IBM PC 
jr. ed il Coleco Adam. Dopo gli imman¬ 
cabili videogiochi, ormai disponibili per 
tutti i gusti e le esigenze, stanno avendo 
notevole sviluppo i programmi “utili”, 
come word processor, spreadsheet, da¬ 
tabase e programmi di grafica, stimolati 
anche dalla ormai massiccia introduzio¬ 
ne in USA del personal computer in am¬ 
biente scolastico. 

Grandissimo successo ha ottenuto il 
programma “Jet” della Sublogic (quella 
del Flight Simulator II), che questa volta 
simula molto realisticamente il pilotag¬ 
gio di un caccia F-16. 

Una delle periferiche sempre più richie¬ 
ste dai possessori di home e personal 
computer è la stampante: al Consumer 
Electronic Show sono iniziate ad appari¬ 
re le prime stampanti “a trasferimento 
termico”. Questa nuova tecnologia per¬ 
mette di ottenere una stampa termica 
su carta normale, ad un costo di produ¬ 
zione molto basso e con una qualità 
estremamente elevata. Con questa tec¬ 
nologia è tra l’altro possibile stampare 
anche a colori, semplicemente sosti¬ 
tuendo il nastro della stampante; si so¬ 
no ottenute fino ad ora velocità di stam¬ 
pa di 50 caratteri al secondo, accompa¬ 
gnate da una notevole silenziosità di 
funzionamento. 

A proposito di nuove tecnologie, ne so¬ 
no state presentate alcune innovative, 
ed altre invece che hanno ormai rag¬ 
giunto degli stadi di sviluppo molto per¬ 
fezionati. Una delle più interessanti è la 
tecnologia degli schermi piatti a colori 
realizzati con cristalli liquidi: ogni pixel, 
formato da tre piccoli “sottopixel” di 
diverso colore, viene plottato da un 
transistor con velocità sufficientemente 
elevata da poter utilizzare lo schermo 
anche per immagini televisive. Per ora 
tuttavia le dimensioni di questi schermi 
sono molto ridotte (poco più di 2 pollici 
e mezzo gli standard, con un prototipo 
da 4.25 pollici); si pensa tuttavia che i 
problemi connessi alla realizzazione di 
schermi anche molto grandi possano es¬ 
sere risolti nell’arco di breve tempo. La 
giappponese Seiko presentava un ter¬ 
minale da polso, nel quale è possibile 
inserire, tramite un computer, una serie 
di informazioni da consultare in un se¬ 
condo tempo. Naturalmente, si tratta di 
gadget dalla dubbia utilità, utili tuttavia 
per aprire la strada alla miniaturizzazio¬ 
ne sempre più spinta di queste sorpren¬ 
denti “macchinette” che sono i compu¬ 
ter. 
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MLX 

per VIC 20 


di C. Brannon 

trad. e adatt. 

di F. Stella 


M LX è un programma che permet¬ 
te di inserire listati in linguaggio 
macchina esenti in modo assoluto da 
errori e senza la perdita di tempo del 
dover battere e controllare lunghe se¬ 
quenze di istruzioni DATA. 

Molti dei nostri listati di programmi in 
linguaggio macchina hanno il formato 
MLX (li riconoscete dal fatto che sono 
esclusivamente numerici) e richiedono 
quindi che MLX sia caricato in memoria 
ed eseguito prima della battitura del li¬ 
stato. 

MLX vi chiederà l’indirizzo della loca¬ 
zione di partenza e quello della locazio¬ 
ne finale del programma da caricare. 
Questi valori sono sempre indicati nel¬ 
l’articolo che accompagna il listato. 
MLX vi segnala automaticamente gli er¬ 
rori di battitura MENTRE STATE DIGI¬ 
TANDO IL LISTATO e vi chiede di 
reinserire la linea errata. L’ultimo nu¬ 
mero battuto di ogni linea rappresenta 
il checksum e viene visualizzato in re¬ 
verse. 

Sono inoltre disponibili altri comandi, 
quali: 

SHIFT-N nuovo indirizzo: permette di 
cambiare l’indirizzo della linea che vole¬ 
te battere ed è utile nel caso si inserisca¬ 
no i listati in più parti. 


SHIFT-D display: lista i dati inseriti tra 
due indirizzi di inizio e fine. 

SHIFT-L load: carica un file da nastro 
o SH1FT-S save: salva su nastro o disco 
un file in formato MLX. 

Una volta battuto il listato, e salvatolo 
tramite MLX, si potrà caricare diretta- 
mente il programma con un’istruzione 


LOAD “nome del file”,1,1 per il regi¬ 
stratore, oppure LOAD “nome del fi- 
le”,8,1 per l’unità a dischi, salvo diverse 
indicazioni date negli articoli corrispon¬ 
denti ai vari programmi. Il programma 
sarà generalmente mandato in esecu¬ 
zione con una SYS (indirizzo di parten¬ 
za). 



MLX versione per VIC 20 

100 PRINT"(CLR){PUR}";CHR$(1 42) ;CHR$(8); 

: rem 181 

1.01 POKE788,1 94: REM DISABILITA RUN/STOP 

:rem 144 

110 PRINT"{RVS}{ 14 SPAZI}" : rem 117 

120 PRINT"{RVS} {DES}{OFF}(<*>]£{RVS} 

{DES} {DES}{ 2 SPAZI} [<*>] {OFF} [<*>] 
£{RVS}£{RVS} " : rem 191 

130 PRINT"lRVS} {DES} (<G>]{DES} 

{ 2 DES} {OFF}£{RVS}£[<*>] {OFF} (<*>] 
{RVS} {OFF}" : rem 122 

140 PRINT"{RVS}{ 14 SPAZI}" :rem 120 

200 PRINT"{ 2 GIU'}{PUR}{BLK}UN PROGRAMMA 
PER L'IN-TRODUZIONE{ 2 SPAZI}DI ROUT 
INEIN LINGUAGGIO MACCHINA"; : rem 202 
205 PRINT"A PROVA DI ERRORE{ 5 GIU'}" 

:rem 226 

210 PRINT"{BLK}{ 4 SUjlNDIRIZZO DI PARTEN 
ZA":INPUTS:F=1-F:C$=CHR$(31+11 9*F) 

:rem 52 

220 IFS< 2 560RS>32767THENGOSUB3000 : GOTO210 

: rem 2 

225 PRINT:PRINT:PRINT:PRINT :rem 123 

230 PRINT"{BLK}{ 3 SU}lNDIRIZZO CONCLUSIV 
0": INPUTE:F = 1-F:C$=CHR$(31+119*F) 

:rem 170 


240 IFE<2 56ORE>32767THENGOSUB3000:GOTO230 

:rem 234 

250 IFE<STHENPRINTC$;"{RVS}INDIRIZZO CONC 
LUSIVO INDIRIZZO DI PARTENZA 
{ 3 GIU'}":GOSUB1000 :GOTO230: rem 27 
260 PRINT:PRINT:PRINT :rem 179 

300 PRINT"{CLR}”;CHR$(14):AD=S :rem 56 
310 PRINTRIGHTS("0000"+MID$(STR$(AD),2),5 
);":";:FORJ=lT06 :rem 234 

320 GOSUB570:IFN=-1THENJ=J+N:GOTO320 

:rem 228 

390 IFN=-211THEN710 :rem 62 

400 IFN=-204THEN790 :rem 64 

410 IFN=-206THENPRINT:PRINT"{GIU'UNSERIS 
CI UN NUOVO{ 4 SPAZI}INDI RI ZZO"; :INPU 
TZZ :rem 42 

415 IFN=-206THENIFZZ<SORZZ>ETHENPRINT" 
{RVSjESCE DAL CAMPO DI VA-" : rem 150 

416 IFN=-206THENIFZZ<SORZZ>ETHENPRINT" 
{RVS}LORI INDICATO":GOSUBl000:GOTO410 



: rem 

1 05 

417 

IFN=-206THENAD = ZZ:PRINT:GOTO31 0 



: rem 

238 

420 

IFNO-196THEN480 :rem 

1 33 

430 

PRINT:INPUT"LISTATO:DA";F:PRINT," 

{ 2 SIN}A"; :INPUTT :rem 

29 
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440 IFF<SORF>EORT<SORT>ETHENPRINT"MINIMO" 
; S ; "{SIN} , MASSIMO"; E : GOTO430 

: rem 36 

450 FORI=FTOTSTEP6 : PRINT:PRINTRIGHTS("000 
0"+MIDS(STR$(I),2),5):rem 30 


766 POKE782 ,E/256:POKE781 ,E-PEEK(782)*256 
:SYS65496 :rem 124 

770 IF(PEEK(783)AND 1)OR(ST ANDl91)THEN780 

: rem 111 

775 PRINT"{GIU'{OPERAZIONE CONCLUSAEND 


455 FORK=0TO5:N=PEEK(I+K) : IFK=3THENPRINTS 
PC(10) ; : rem 34 

457 PRINTRIGHTS("00"+MID$(STR$(N) ,2) ,3) ;" 

: rem 157 

460 GETAS : IFA$>""THENPRINT:PRINT:G0T0310 

:rem 25 

470 NEXTK : PRINTCHRS(20);:NEXTI:PRINT:PRIN 



T:GOTO310 

: rem 

50 

480 

IFN<0THENPRINT:GOTO310 

: rem 

1 68 

490 

A(J)=N:NEXTJ 

: rem 

199 

500 

CKSUM=AD-INT(AD/256) *256: 

FORI=1T06:CK 


SUM=(CKSUM+A(I))AND255:NEXT :rem 

200 

510 

PRINTCHRS(18); :GOSUB570:PRINTCHRS(20) 



: rem 

234 

515 

IFN=CKSUMTHEN530 

: rem 

255 

520 

PRINT:PRINT"LA RIGA E' STATA INSE 

-RIT 


A IN MANIERA ERRATA" 

: rem 

39 

525 

PRINT"RI-INSERIRLA":PRINT 

': GOSUBl 000 : G 


OT031 0 

: rem 

1 67 

530 

GOSUB2000 

: rem 

218 

540 

FORI = 1T06:POKEAD + I- 1 ,A(I ) 

: NEXT 




: rem 

80 

550 

AD=AD+6:IFAD<ETHEN310 

: rem 

212 

560 

GOTO 71 0 

: rem 

108 

570 

N=0:Z=0 

: rem 

88 

580 

PRINT"{<+>]"; 

: rem 

79 

581 

GETAS: IFA$ = ""THEN581 

: rem 

95 

585 

PRINTCHRS(20); :A=ASC(A$): 

IFA=130RA=44 


ORA= 32THEN670 

: rem 

229 

590 

IFA>12 8THENN = - A: RETURN 

: rem 

1 37 

600 

IFA020THEN630 

: rem 

1 0 

610 

GOSUB690 : IFI = 1ANDT=44THENN=-1 : PRINT" 


{SIN} {SIN}";:GOTO690 

: rem 

1 72 

620 

GOTO570 

: rem 

1 09 

630 

IFA<48ORA>57THEN580 

: rem 

1 05 

640 

PRINTAS;:N=N*10+A-48 

: rem 

1 06 

650 

IFN>255THENA=20:GOSUB1000 

: GOTO 600 




: rem 

229 

660 

Z=Z+1:IFZ<3THEN580 

: rem 

71 

670 

IFZ = 0THENGOSUBl000 : GOTO 570 :rem 

11 4 

680 

PRINT",: RETURN 

: rem 

240 

690 

S% = PEEK(209)+256*PEEK(210)+PEEK(21 1) 



: rem 

1 49 

692 

FORI=1T03:T=PEEK(S%-I) 

: rem 

68 


695 IFT< >44ANDT< >58THENPOKES%-1,32:NEXT 

: rem 205 

700 PRINTLEFTS("{ 3 SINI-1);:RETURN 

: rem 7 

710 PRINT"{CLR}{RVS}*** SAVE *** 

{ 3 GIU*}" : rem 236 

720 INPUT"{GIU'} NOME DEL FILE";F$ 

:rem 199 

730 PRINT:PRINT"{ 2 GIU'}{RVS}N{OFF}ASTRO 
O {RVS}D{OFF}ISCO: (N/D)" :rem 128 

740 GETAS:IFA$<>"N"ANDA$<>"D"THEN740 

:rem 30 

750 DV=1- 7*(A$ = "D") :IFDV=8THENF$ = "0:”+FS 

: rem 158 

760 T$=F$:ZK = PEEK(53)+256*PEEK(54)-LEN (TS 
):POKE782,ZK/256 :rem 3 

762 POKE781,ZK-PEEK(782)*256:POKE780,LEN( 

T$):SYS65469 :rem 109 

763 POKE780,1:POKE781,DV:POKE782,1:SYS654 

66 :rem 69 

765 POKE254,S/256:POKE253,S-PEEK(254)*256 
:POKE780,253 :rem 12 


: rem 152 


780 PRINT"{GIU’{ERRORE DI REGISTRAZIO-NE. 



RIPROVA.":IFDV=1THEN720 

: rem 

8 

781 

OPEN15,8,15 : INPUT#! 5,El$ 

,E2$:PRINTE1$ 


;E2$:CLOSEl5:GOTO720 

: rem 

103 

782 

GOTO720 

: rem 

1 1 5 

790 

PRINT"{CLR}{RVS}*** LOAD 

* * * 



{ 2 GIU'}" 

: rem 

212 

800 

INPUT"{ 2 GIU'} NOME DEL 

FILE";F$ 




: rem 

215 


810 PRINT:PRINT"{ 2 GIU'}{RVS}N{OFF{ASTRO 
O {RVS}D{OFF}ISCO: (N/D)" :rem 127 
820 GETAS:IFA$< >"N"ANDA$< >"D"THEN82 0 


:rem 28 

830 DV=1-7*(A$="D"):IFDV=8THENF$="0:"+F$ 

: rem 157 

840 T$=F$:ZK=PEEK(53)+256*PEEK(54)-LEN(T$ 


):POKE782,ZK/256 :rem 2 

841 POKE781,ZK-PEEK(782)*256:POKE780,LEN( 



T$ ) :SYS65469 

: rem 

107 

845 

POKE780,1 :POKE781,DV:POKE782 

,1 :SYS654 


66 

: rem 

70 

850 

POKE780,0:SYS65493 

: rem 

1 1 

860 

IF(PEEK(783)ANDl)OR(ST ANDl91 ) THEN870 



: rem 

1 1 1 

865 

PRINT"{GIU 1 {OPERAZIONE CONCLUSA." 

: GOT 


0310 

: rem 

142 

870 

PRINT"{GIU 1 {ERRORE DI CARICAMENTO 

. RI P 


ROVA.{GIU'}":IFDV=1THEN800 

: rem 

43 

880 

OPENl5,8,15:INPUT#15,E1S,E2S 

: PRINTEl$ 


;E2$:CLOSEl5:GOTO800 

: rem 

1 02 

1 000 

REM CICALINO 

: rem 

231 

1001 

POKE36878,1 5:POKE368 74,1 90 

: rem 

206 

1002 

FORW=lTO300:NEXTW 

: rem 

1 1 7 

1003 

POKE36878,0:POKE36874,0:RETURN 




: rem 

74 

2000 

REM CAMPANELLO 

: rem 

1 30 

2001 

FORW=15TOOSTEP-1:POKE36878, 

W: POKE368 


76,240:NEXTW :rem 22 
2002 POKE36876,0 : RETURN :rem 119 
3000 PRINTCS;"{RVS{NON IN PAGINA ZERO O 
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di T. Henry 

trad. ed adatt. 

di S. Colombo 



La ROM del Vie 20 e la possibilità 
di spostare aree di memoria 



Se programmate abitnalmente in 
BASIC, potreste non esservene 
mai accorti, ma il vostro VIC 20 
possiede, già all’atto dell’accen¬ 
sione, una collezione di routine 
in linguaggio macchina che co¬ 
stituisce un vero tesoro. 


L a ROM (Read Only Memory) del 
VIC 20 è infatti costituita da tutto 
un insieme di normali routine in linguag¬ 
gio macchina, che presiedono allo svol¬ 
gimento di tutte le operazioni “quotidia¬ 
ne” del computer, dalla generazione del 
cursore al salvataggio di un programma 
su nastro o disco. 

Anche il Sistema Operativo del compu¬ 
ter è costituito da un lungo programma 
in linguaggio macchina, dotato di nume¬ 
rose subroutine, che eseguono ognuna 
particolari compiti. Benché le routine 
della ROM siano state scritte dai pro¬ 
gettisti del VIC 20 per “uso interno” del 
computer, molte di esse possono essere 
tranquillamente usate anche all’interno 
dei nostri programmi in BASIC. Una 
routine della ROM che si rivela estre¬ 
mamente utile con il BASIC è quella 
che esegue il trasferimento del contenu¬ 
to di una certa area di memoria in una 
nuova area. Il Sistema Operativo chia¬ 
ma questa routine ogni volta che ag¬ 
giungete una linea nel bel mezzo di un 
programma BASIC: per creare in me¬ 
moria lo spazio necessario per contene¬ 
re la nuova linea tutta la parte seguente 
del programma BASIC viene traslata in 
avanti di un numero di byte esattamen¬ 
te pari a quello dei byte costituenti la 
nuova linea. Dal momento che questa 
routine ROM è scritta in linguaggio 
macchina, può muovere centinaia di by¬ 


te in meno di un lampeggio di cursore. 

In quali altre occasioni sono utili gli spo¬ 
stamenti di aree di memoria? Nel word 
processing e nei database è spesso ne¬ 
cessario spostare blocchi di dati da una 
posizione in un’altra. L’aggiunta di una 
frase nel bel mezzo di un documento 


rappresenta per il computer un lavoro 
molto più gravoso dell'aggiungere una 
linea a metà di un programma BASIC: 
ogni cosa che si trova al di sopra del 
punto di inserimento dovrà essere spo¬ 
stata. 

Gli spostamenti di aree di memoria so- 
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REM:KW 


no inoltre utili nelle applicazioni grafi¬ 
che. 11 classico primo passo nella ridefi¬ 
nizione dei caratteri consiste nel copiare 
l’intero set da ROM a RAM, dove può 
essere modificato a piacere. Lo sposta¬ 
mento del set di caratteri di 2048 byte 
richiede circa trenta secondi di attesa, 
se effettuato da BASIC, e meno di un 
secondo, se si ricorre alla routine della 
ROM. 

Il primo programma listato in fondo al¬ 
l’articolo mostra come utilizzare da BA¬ 
SIC la routine ROM di spostamento del¬ 
le aree di memoria: attivandolo, vi ri¬ 
chiederà tre valori, rispettivamente per 
la locazione iniziale del blocco di memo¬ 
ria da spostare, la sua locazione finale 
e la locazione da cui volete che inizi la 
parte trasferita. Naturalmente - è forse 
superfluo specificarlo - la routine ROM 
trasferisce zone di memoria semplice- 
mente riproducendole altrove: il conte¬ 
nuto della zona “iniziale” non viene in 
alcun modo cancellato od alterato dalla 
routine. 

Proviamo un semplice esempio grafico, 
muovendo un blocco di memoria “bas¬ 
sa” verso l’alto, e precisamente all’in¬ 
terno della memoria di schermo, al fine 
di renderlo visibile. Pulite lo schermo, 
premendo SHIFT+CLR/HOME, e digi¬ 
tate in modo diretto la seguente istruzio¬ 
ne: 

FORJ=38400T038905:POKEJ,0:NEXT 

Date quindi il RUN al programma 1 ed 
inserite i seguenti valori, rispondendo 
alle domande del computer: 

inizio : 0 
fine : 505 
nuova: 7680 

Lo schermo si riempirà di caratteri pro¬ 
venienti dai 506 byte più bassi della 
memoria del VIC 20. Come potete no¬ 
tare, il trasferimento di circa 1/2 Kbyte 
di memoria è stato istantaneo: i byte 
sono stati trasferiti nel tempo che il BA¬ 
SIC impiegherebbe ad eseguire soltanto 
i calcoli preliminari. 

Questo programma è molto facile da 
incorporare come subroutine all’interno 
di un qualsiasi programma BASIC: le 
variabili S, E ed N rappresentano rispet¬ 
tivamente la locazione iniziale e finale 
del blocco “sorgente”, e la locazione ini¬ 
ziale del blocco “destinazione”. Sarà 
sufficiente eliminare gli input, sostituirli 
con le definizioni desiderate delle varia¬ 
bili ed aggiungere un’istruzione di RE¬ 
TURN alla fine della sobroutine. 

Si -noti che la linea 30 aggiunge una 
unità all’indirizzo finale del blocco “sor¬ 
gente”: ciò perché la routine ROM, per 
sua natura, non copia mai l’ultimo byte 
del blocco. La variabile L rappresenta 
la lunghezza del blocco “sorgente”, ot¬ 
tenuta sottraendo il valore di S da quel¬ 
lo di E, mentre le linee da 60 a 80 
convertono i tre indirizzi nel formato by¬ 
te basso/byte alto, usato dal micropro¬ 
cessore quando esegue programmi in 
linguaggio macchina. La linea 120 atti¬ 
va la routine ROM nel corretto punto 


di ingresso, dipendente dal fatto che 
l’indirizzo di partenza del blocco sia un 
multiplo di 256 (posizionato sul margine 
di una pagina di memoria di numero pa¬ 
ri). 

Le linee da 90 a 110 passano gli indiriz¬ 
zi in formato byte basso/byte alto alla 
routine ROM, con istruzioni POKE nelle 
locazioni appropriate. Le locazioni 781 
e 782 passano alla routine ROM l’indi¬ 
rizzo di partenza del blocco “destinazio¬ 
ne” attraverso i registri X ed Y del 
microprocessore. Dal momento che è 
stato aggiunto un 1 all’indirizzo finale 
del blocco “sorgente”, la linea 100 com¬ 
pie la stessa operazione con l’indirizzo 
finale del blocco “destinazione”. Quan¬ 
do le aree “sorgente” e “destinazione” 
non si sovrappongono in alcuna parte, 
si è liberi di usare la routine ROM per 
spostamenti sia verso l’alto che verso il 
basso. Al contrario, se le due aree si 
sovrappongono in qualche loro parte, 
occorre considerare la direzione del tra¬ 
sferimento e trasferire quindi i byte nel¬ 
l’ordine appropriato. 

Per illustrare questa situazione ponia¬ 
mo di voler muovere verso l’alto di un 
byte un blocco di memoria lungo cinque 
byte: dalle locazioni 300-304 alle loca¬ 
zioni 301-305. Se iniziamo a‘muovere i 
byte dalla locazione più bassa del bloc¬ 
co sorgente, il byte nella locazione 300 
sarà copiato nella locazione 301. Quin¬ 
di il byte nella locazione 301 verrà co¬ 
piato nella 302 e cosi via. Potete vedere 
che il byte contenuto nella locazione 
300 viene così ripetuto in tutte le loca¬ 
zioni del blocco. 

Per evitare questo inconveniente la rou¬ 
tine ROM inizia sempre con l’ultimo by¬ 
te (più alto) del blocco sorgente e copia 
dall’alto verso il basso. Nell’esempio di 
cui sopra la routine ROM inizierà con il 
trasferire il contenuto del byte più alto 
del blocco sorgente, la locazione 304, 
nella locazione 305 (byte più alto del 
blocco destinazione). Quindi il byte con¬ 
tenuto nella locazione 303 nella locazio¬ 
ne 304 e cosi via, fino a che tutti i byte 
siano stati ricopiati senza inconvenien¬ 
ti. 

11 trasferimento dei byte nell’ordine dal¬ 
l’alto verso il basso è perfetto per spo¬ 
stamenti verso locazioni più alte, ma 
non funziona correttamente se si voglio¬ 
no effettuare spostamenti verso locazio¬ 
ni più basse. Si crea infatti un problema 
analogo e speculare a quello visto pri¬ 
ma. Ricordiamo che questo inconve¬ 
niente si verifica soltanto se i due bloc¬ 
chi sorgente e destinazione si sovrap¬ 
pongono in qualche loro parte. 
Sfortunatamente la ROM non contiene 
una routine che effettua generici sposta¬ 


menti di memoria dall’alto verso il bas¬ 
so. Quando viene cancellata una linea 
BASIC, il puntatore alla fine del pro¬ 
gramma viene spostato verso il basso 
della quantità necessaria, ma il linguag¬ 
gio macchina in ROM che effettua que¬ 
sta operazione non può essere richia¬ 
mato come una particolare routine, ed 
è.utile solamente per lo spostamento di 
linee di programma BASIC tra loro col¬ 
legate. Per risolvere questo problema il 
programma 2 genera una routine in lin¬ 
guaggio macchina per muovere verso il 
basso aree di memoria parzialmente 
coincidenti, evitando il problema di cui 
sopra. Dal momento che questa routine 
è completamente rilocabile, potete si¬ 
stemarla dove preferite nella RAM del 
VIC 20, semplicemente modificandone 
l'indirizzo di partenza in linea 5. 
Vengono usate per gli indirizzi iniziali e 
finali le stesse locazioni del programma 
1. Si noti che questa routine non sposte¬ 
rà correttamente blocchi di memoria al¬ 
l’interno della pagina zero (locazioni 
0-255): non si tratta di una limitazione 
molto pesante, dal momento che è piut¬ 
tosto difficile immaginare una ragione 
per voler muovere verso il basso la me¬ 
moria contenuta in pagina zero. Per 
muoverla verso l’alto si può invece tran¬ 
quillamente usare il programma 1. Più 
a lungo userete queste due routine, più 
troverete occasioni in cui si renderanno 
utili: per esempio, il fatto che venga 
sempre ricopiato lo stesso byte in tutte 
le locazioni è sicuramente indesiderabi¬ 
le, se si vogliono trasferire blocchi di 
memoria, ma può tornare utile se si de¬ 
sidera per esempio pulire una pagina 
grafica. Un’operazione come questa ri¬ 
chiede molto tempo, se effettuata in 
BASIC, mentre è istantanea, se si usa 
la routine in linguaggio macchina. 
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Programma 1: 

utilizzo della routine ROM 


5 REM UTILIZZO ROUTINE ROM 


: rem 

1 83 

1 0 

D = 50156 


: rem 

227 

20 

INPUT"{CLR}lNIZIO";S 


: rem 

41 

30 

INPUT"FINE{ 2 SPAZI}";E 

:E=E+1 

: rem 

54 

40 

INPUT"NUOVA ";N 


: rem 

74 

50 

L=E-S:EN=L+N 


: rem 

1 30 

60 

A%=L/256:A=L-256*A% 


: rem 

1 27 

70 

B %=(EN-A)/256:B=EN-256* 

B%-A 

: rem 

62 

80 

C%=(E-A)/256:C=E-256*C% 

-A 

: rem 

1 66 

90 

POKE781 ,A%+1 :POKE782,A 


: rem 

1 57 

1 00 

POKE91,C%:POKE90,C 


: rem 

255 

no 

POKE89,B%:POKE88,B 


: rem 

12 

1 20 

IFA=0THENSYS(D+7) : END 


: rem 

6 

1 30 

SYS(D) 


: rem 

40 


Programma 2: 
spostamento verso il basso 
di blocchi di memoria 

4 REM TRASFERIMENTO VERSO IL BASSO 



: rem 

1 51 

5 D=828: REM MODIFICARE QUESTO 

VALORE 

SE 

SI VUOLE RI LOCARE LA ROUTINE 

: rem 

1 82 

10 FORJ =DTOD + l8 :READA:POKEJ, A: 

NEXT 



: rem 

1 90 

20 INPUT"{CLR}INIZI0";S:S=S-1 

: rem 

164 

30 INPUT"FINE{ 2 SPAZI }";E 

: rem 

217 

40 INPUT"NUOVA ";N:N=N-1 

: rem 

1 87 

50 L=E-S 

: rem 

1 79 

60 A%=L/256:A=256-L+256*A% 

: rem 

71 

70 IFA=256THENA=0:A%=A%-1 

: rem 

143 

80 B%=(N-A)/256:B=N-256*B%-A 

: rem 

181 

90 C%=(S-A)/256:C=S-256*C%-A 

:rem 

1 95 

100 POKE781,A%+1:POKE782,A 

: rem 

197 

110 POKE91,C%:POKE90,C 

: rem 

0 

120 POKE89,B%:POKE88,B 

: rem 

1 3 

130 SYS(D) 

: rem 

40 

140 DATAI 77,90,145,88,200,208, 

249,230 

,91 , 

230 

: rem 

1 72 

150 DATA89,177,90,145,88,202,208,242, 

96 


: rem 

200 
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Un gioco che, soprattutto se sie¬ 
te in compagnia degli amici, non 
mancherà di divertirvi, svilup¬ 
pando le capacità di attenzione 
visiva. 

Il computer vi chiede un elenco di dieci 
parole, quindi con queste forma un puz¬ 
zle, mischiandole in una scacchiera. Il 
vostro compito consiste nell’individuar- 
le all’ interno della scacchiera, man ma¬ 
no che esse vengono riproposte dal 
computer. Il programma è tale da sorti¬ 
re risultati sempre diversi, essendo dif¬ 
ferente la lista di parole immessa inizial¬ 
mente, e costituisce un passatempo di¬ 
verso dai soliti che non mancherà di 
colpire piacevolmente tutti gli appassio¬ 
nati di enigmistica. 

Utilizzo e strategia 

Dopo avervi chiesto il livello di difficoltà 
con cui desiderate giocare il computer 
chiede di digitare le dieci parole che 
verranno immesse nel puzzle. Le parole 
non devono essere più corte di tre ca¬ 
ratteri o più lunghe di otto. Dopo la 
decima parola il computer inizierà il suo 
lavoro di “mescolatore”, costruendo il 
puzzle. 

Poiché non sempre esiste la certezza 
matematica di poter comporre un puz¬ 
zle con le dieci parole digitate, può darsi 
che, dopo inutili tentativi, il computer 
vi chieda di digitare un’altra lista, dal 
momento che la precedente non risulta 
“mischiabile”. Se al contrario le dieci 
parole che avete digitato soddisfano i 
necessari requisiti di “mischiabilità”, il 
computer dopo una breve attesa visua¬ 
lizza la scacchiera contenente le parole 
in puzzle e vi ripropone la prima parola 
della lista. Dovrete trovarla e digitare il 
numero di riga e di colonna sul quale si 
trova la sua lettera iniziale, quindi la 
direzione su cui è disposta la parola, 
secondo un certo schema riportato sul¬ 
lo schermo, che associa un numero ad 
ogni direzione possibile. 

Il computer vi dirà quindi se avete o 
meno indovinato, e passerà ad un’al¬ 
tra parola, fino al completamento di tut¬ 
te e dieci. Le parole nel puzzle possono 
essere composte in qualsiasi direzione, 
anche in diagonale ed in senso inverso, 


rendendo così difficoltosa e più diver¬ 
tente la loro ricerca. 

Commenti al listato 

1-100 introduzione al gioco 
100-200 presentazione ed inizializzazio- 
ne. È possibile ottenere un puzzle con 
un numero di parole diverso da dieci - 
compatibilmente con la quantità di me¬ 
moria disponibile nel computer, modifi¬ 
cando il valore 10 attribuito sia alla va¬ 
riabile “S” che alla variabile “W” nella 
linea 200. 

210-250 viene richiesto il livello di gioco 
260-410 richiedono la lista di parole ed 
effettuano un controllo sulla lunghezza 
di ognuna di esse. 


420-850 algoritmo di costruzione del 
puzzle con le parole precedentemente 
inserite 

860-1510 il puzzle viene visualizzato, 
ed il computer propone al giocatore 
ogni parola da ricercare, valutando la 
correttezza delle risposte 
1520-1610 chiedono se si vuole disputa¬ 
re un’altra partita e in caso affermativo 
eseguono nuovamente il programma. 
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Paroliere per C16 e Plus/4 


POKE56,60:CLR:COLORO,1:COLOR4,1:SCNCLR 

: rem 7 

A$(0)="PARO-":A$(1)="*LIERE": A$(2)= "" 

:rem 216 

PRINT"{BLK}MO{ 6 GIU'jT D000 DlFF 3E00 
{ 2 GIU *}X{ 2 GIU 1 }G05" :rem 254 

POKE239,5:POKEl319,19 :FORT = 0TO3:POKEl32 


300 

310 

320 


330 


340 


PRINT:PRINT"{OFF}{REDjPAROLA #";X;TAB 
( 8) ; "{ 2 DES} ? { 3 SIN}" :rem 184 

INPUTRS:Q=LEN(R$ ) :rem 8 

IFQ<3THENPRINTTAB(40);"{BLU}{SU} 

{ 7 SPAZI}{RVS}*{ 5 SPAZI}TROPPO CORT 
A{ 7 SPAZI}* {OFF}":GOTO300 :rem 
IFQ>8THENPRINTTAB(40){BLU}{SU} 

{ 7 SPAZI}{RVS}*{ 5 SPAZI}TROPPO 
A{ 7 SPAZI}* {OFF}":GOTO300 :rem 
X9 = 0:FORY = 1TOQ:A=ASC(MID${"*"+RS+"*", 
Y+l,1)) : rem 134 


1 82 

LUNG 

188 


0+T,13 :NEXT:END 

: rem 

1 75 

350 

IFA< 6 5ORA>90THENX9=1:Y=Q 

: rem 

231 

5 SCNCLR:IM=15872:IS=3072:VOL 

8 : rem 

80 

360 

NEXTY: IFX9=1THENPRINTTAB(40) 

" {SU} 


6 FORY=0TO2:H=-8*(Y>0)*Y 

: rem 

161 


{ 6 SPAZI}*{ 6 SPAZIJPAROLA 

SBAGLIATA 

7 I 

<=LEN(A$(Y)):IFL=0THEN20 

: rem 

18 


{ 6 SPAZI}* ":GOTO300 

: rem 

1 83 

8 C 

) = 0:IFLEFTS( A$(Y) ,1)="*"THENQ = 3 : L=I 

.-1 : A 

370 

IFX = 11THENWS(X)R$ + "*": GOTO410 


$(Y)=RIGHT$( A$(Y),L) 

: rem 

21 1 



: rem 

1 38 

9 COLORI,1:CHAR,0,0,A$(Y) 

: rem 

145 

380 

X9 = 0:FORY = 1TOX:IFQ< =LEN(WS(Y))-1THEN4 

1 0 

J = 0:FORX=OTOL-1 :IFX>0THENJ 

s J- 2 



00 

: rem 

1 33 

1 1 


: rem 

57 

390 

FORB=XTOY+lSTEP-1:W$(B)=W$(B 

-1 ):NEXT: 

V=PEEK(IS+X) 

:rem 

1 38 


WS(Y)=R$+"*":X9=1:Y=X-1 

: rem 

32 

12 

FORA=0TO6 

: rem 

209 

400 

NEXT 

: rem 

21 1 

1 3 

CR = PEEK(IM+V* 8+A) 

:rem 

145 

410 

NEXT 

: rem 

212 

1 4 

FORB=lT05 

: rem 

21 2 

420 

REM *‘COSTRUZIONE PUZZLE** 

: rem 

1 1 3 

15 

IF(CRAND2 TB)=0THENl9 

: rem 

134 

430 

COLOR 0,2 

: rem 

164 

16 

COLORI,INT(RND(0)* 1 5 ) + 2,1NT(RND(0) 

*8) 

440 

PRINT" {BLU} {CLR} { 6 GIU’H 9 

SPAZI}HO 



: rem 

0 


ABBASTANZA PAROLE !" 

: rem 

21 1 

17 

CX = 7-B+X* 8+J +Q:CY=A+Y* 8+1 

: rem 

82 

450 

PRINT" {PUR} { 5 GIU'H 10 SPAZI }ATTEND 

1 8 

CHAR,CX,CY,CHR$(209):SOUND 

1,900,. 

5 


I UN ATTIMO... 

: rem 

61 

19 


: rem 

1 19 

460 

PRINT"{BLK}{ 4 GIU’H 9 SPAZI}STO 

FAC 

NEXTB,A,X 

:rem 

220 


ENDO IL PUZZLE!" 

: rem 

1 97 

20 

NEXTY 

: rem 

250 

470 

FORX = 1TOS:FORY = 1TOS:M(Y,X)=42:NEXT:NE 

21 

FORT=1T05000:NEXT 

: rem 

237 


XT:Q=0 

: rem 

94 

22 

COLORO,2:COLORI,1:COLOR4,15,6 : SCNCLR:P 

480 

FORX=1TOS : FORY = 1TOS : P(Y,X)=0 

: NEXT 



OKE56,63:CLR 

: rem 

28 


: rem 

1 87 

100 

REM **INTRODUZIONE** 

: rem 

199 

490 

NEXT:Q=Q+1:IFQ>WTHEN800 

: rem 

199 

110 

CLR:A=0 

: rem 

91 

500 

G=LEN (W$ (Q))-2 

: rem 

1 97 

1 20 

COLOR 4,1:COLOR 0,1:COLOR 

1,3 


510 

X9 = 0 : FORX = 1TOS : FORY = 1TOS : IFP(Y,X) = 

0TH 



: rem 

50 


ENX9=1:X=S:Y=S 

: rem 

1 1 8 

1 30 

A=A+1 

: rem 

1 75 

520 

NEXT:NEXT:IFX9=1THEN550 

: rem 

224 

1 40 

PRINT"{CLR}" : PRINT"{FLASH 

ON} 


530 

PRINT"{CLR}QUESTA LISTA DI PAROLE 

NON 


{ 7 GIU 1 }{ 10 DES}{GIU 1 } {RVS} 



E' SODDISFACENTE. 

: rem 

1 87 


{ 20 Q}" 

: rem 

1 50 

540 

PRINT"DIGITA UN'ALTRA LISTA. 

": GOTO270 

1 50 

PRINT"{FLASH ON}{RVS}{ 10 

DES }Q 




: rem 

1 7 


{ 18 SPAZI}Q" 

: rem 

191 

550 

A=INT(S*RND ( 1 ) +1):B=INT(S*RND(1)+1):I 

160 

PRINT"{FLASH ON}{RVS}{ 10 

DES }Q 



FP (B,A) O0THEN550 

: rem 

83 


{ 5 SPAZI}PAROLIERE{ 4 SPAZI}Q" 

99 

560 

P(B,A)=1:IFM(B,A)=42THEN580 

: rem 

222 



: rem 




170 

PRINT"{FLASH ON}{RVS}{ 10 

DES }Q 







{ 18 SPAZI}Q" 

: rem 

1 93 





1 80 

PRINT"{FLASH ON}{RVS}{ 10 

DES} 







{ 20 Q } {OFF }" 

: rem 

6 





190 

FORX=lT02000 : NEXT 

: rem 

37 





200 

S=10:W=10:DIMM(S,S),W$(W), 

P(S,S) , 

L(W, 






210 

220 

230 

240 

250 

260 

270 

280 

290 


COLOR 4,5:COLOR 0,2:PRINT"{CLR}{GIU'} 
{BLU}{ 11 SPAZI}QUALE{ 2 SPAZI}DIFFIC 
OLTA"' : rem 4 8 

PRINT:PRINT:PRINT :rem 175 

PRINT"{PUR}DA 1(FACILE)A 5(DIFF) 

{ 3 SPAZI}3{ 3 SIN}"; : rem 210 

INPUTRS:X=VAL(R$):IFX<1ANDX>5THEN210 

: rem 3 

SL=9-X :rem 49 

REM *‘PAROLE DA SCOPRIRE** :rem 211 

PRINT" {BLK} { 2 GIU'H 12 SPAZI }DIGITA 
"W" PAROLE" :rem 44 

PRINT:PRINT"{ 7 SPAZI}LUNGHE DA 3 A 8 
CARATTERI.{ 3 SPAZI}" : rem 243 

FORX=1TOW:L(X,1)=0:L(X,2)=0:L(X,3)=0 

:rem 48 
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570 IFM(B,A)OASC(LEFT$(W$(Q) ,1) )THEN510 





: rem 

249 

580 

FORX = 1TO 8 :F(X)=0:NEXT 


: rem 

52 

590 

X9=0:FORX=1T08:IFF(X)= 

0THENX9=1:X= 

8 




: rem 

1 84 

600 

NEXT:IFX9 = 0THEN51 0 


: rem 

97 

610 

D = INT(8*RND(1)+1) :IFF(D) = 

1THEN610 





: rem 

80 

620 

F (D)=1:ONDGOTO630,670, 

660 

,700,690, 

730 


,720,640 


: rem 

62 

630 

IF(A+G)>STHEN590 


: rem 

1 38 

640 

IF (B-G)<1THEN590 


: rem 

106 

650 

GOTO740 


: rem 

111 

660 

IF(B+G)>STHEN590 


: rem 

1 42 

670 

IF(A+G)>STHEN590 


: rem 

142 

680 

GOTO740 


: rem 

1 1 4 

690 

IF(A-G)<1THEN590 


: rem 

110 

700 

IF(B+G)>STHEN590 


: rem 

1 37 

710 

GOTO740 


: rem 

108 

720 

IF(B-G)<1THEN590 


: rem 

105 

730 

IF(A-G)<1THEN590 


: rem 

105 

740 

X=A:Y=B:X9=0:FORN=2TOG+1: 

GOSUBl620 

1 : IF 


M(Y,X)=42THEN760 


: rem 

21 


750 IFM(Y,X) OASC (MID$ (W$ (Q) ,N,1) )THENX9= 
1:N=G+1 : rem 33 

760 NEXT:X=A:Y=B:IFX9=1THEN590 :rem 147 

770 F0RN=1TOG + 1:IFM(Y,X)=42THENM(Y,X)=ASC 
(MID$(W$(Q),N,1)) : rem 192 

780 GOSUBl620:NEXT :rem 97 

790 L(Q,1) =A- 1 :L(Q,2)=B-1 :L(Q,3)=D:IFQ<WT 
HEN480 : rem 170 

800 FORY = 1TOS:FORX = 1TOS:IFM( Y, X)=42THENM( 



Y,X)=INT(25*RND(1)+65) 

: rem 

176 

810 

NEXT:NEXT:WP=0:TS=0 

: rem 

237 

820 

COLOR 4,8 

: rem 

1 77 

830 

PRINT"{CYN}{CLR}{ 5 GIU 

1 }FATTO!" 




: rem 

1 46 

840 

PRINT"{GRN}{ 5 GIU'}PREMI UN TASTO 

i" 



: rem 

1 39 

850 

GETKEY R$ 

: rem 

220 

860 

COLOR 4,2 

: rem 

1 75 

870 

PRINT"{BLU}{CLR}{GIU'} 

{GIU'} 



{ 2 SPAZI}{RVSJCOLONNA" 

; TAB (14);" 



{CYN}{RVS}{SU} PAROLA" 

: rem 

168 


880 PRINT"{BLU}{ 4 GIU'}{RVS}R{GIU'}{SIN} 
I{GIU 1 }{SIN}G{GIU'}{SIN}A{ 6 SU} 

{ 2 SIN}{OFF}" ; : rem 128 

890 PRINT"{BLK}{ 4 DES}"; :rem 177 

900 FORX = OTOS-1 :PRINTRIGHTS(STR$(X) ,1) ;:N 
EXTX :PRINT:Y = 1:GOSUBl710 :rem 205 

910 FORY=1TOS:PRINT"{DES}";RIGHT$(STR$(Y- 
1 ) , 1 ) ;; :rem 173 

920 FORX = lTOS:PRINTCHR$(M(Y,X)); :NEXTX 

:rem 222 

930 PRINT"-":NEXTY:Y = 0:GOSUBl710 : rem 159 
940 PRINT"TrED}{RVS}{GIU'}{ 3 SPAZI}7 8 1 
{ 3 SPAZI}" :rem 77 

950 PRINT" {RVS}{ 4 SPAZI 4 SPAZI }":P 

RINT"{RVS}{ 3 SPAZI}6 *Q* 2{ 3 SPAZI}" 

:rem 207 

960 PRINT"{RVS}{ 4 SPAZI}NBM{ 4 SPAZI}":P 
RINT"{RVS}{ 3 SPAZI}5 4 3{ 3 SPAZI}" 

:rem 152 

970 G=17:GOSUBl750:PRINT:PRINT"{SU}"TAB(1 
2);:PRINT"{PUR}{RVS}{ 2 SPAZI}PUNTI 
{ 2 SPAZI}":PRINTTAB(12);"[<J>] 

{ 7 SPAZI}[<L>]" srem 193 

980 PRINTTAB(12) ;" 1<J>]{ 2 SPAZI}0 

{ 4 SPAZI}{<L>}" ! rem 211 

990 PRINTTAB(12);"[<J>]{ 7 SPAZI}[<L>]" 

:rem 164 


1000 

PRINTTAB(12);"{< 9 U>]":PRINT"{HOME} 


II 

: rem 

238 

1010 

G=2:GOSUBl750:PRINT"{ 9 SPAZI}" 




: rem 

1 0 

1020 

WP=WP+1: IFWP>WTHEN 1 480 

: rem 

171 

1 030 

Q=LEN(W$(WP))-1 

: rem 

83 

1 040 

GOSUBl 750 :PRINTTAB(15-(Q/2)) ;LEFT$ (W 


$(WP),Q):TI$="000000" 

2 rem 

254 

1 050 

G=4:GOSUBl750 :PRINTTAB(15) 

;"{BLU}POS 


* Il 

: rem 

24 

1 060 

PRINTTAB(15)"{GRN}RIG{BLK} 

, {RED}COL" 



2 rem 

220 

1070 

FORG = 6TOl1 :GOSUBl 750 

2 rem 

245 

1080 

PRINT"{ 5 SPAZI}":NEXTG:G= 

6:GOSUBl7 5 


0 

: rem 

213 

1 090 

GETKEY B$ 

: rem 

249 

1100 

IFASC(B$)=13THEN1090 

: rem 

121 

1110 

PRINTB$;","; :IFB$ = "0"THENB 

=0:GOTOl13 


0 

: rem 

1 46 

1 1 20 

B=VAL(B$):IFB<10RB>9THENPRINT" 



{ 2 SIN}{ 2 SPAZI}{ 2 SIN} 

";:GOTOl09 


0 

2 rem 

1 55 

1130 

GETKEY A$ 

2 rem 

243 

1 1 40 

IFASC(A$)=13THEN1130 

2 rem 

119 

1150 

PRINTAS:IFA$ = "0"THENA=0: GOTO 1170 




2 rem 

1 77 

1160 

A=VAL(A$):IFA<1ORA>9THENl070 




: rem 

166 

1170 

G=7:GOSUBl750:PRINT"DIR:" : 

PRINT: 

PRI N 


TTAB(15);" {SIN}"; 

:rem 

162 

1180 

GETKEY D$ 

: rem 

251 

1190 

IFASC(D$)=13THEN1180 

: rem 

132 

1 200 

PRINT"{SU}{DES}";D$:D=VAL(D$):IFD<10 


RD>8THENl170 

: rem 

9 

1210 

WT=TI : IFBOL (WP,2)THENl 240 

: rem 

102 

1 220 

IFA< >L(WP,1)THENl240 

: rem 

166 

1230 

IFD=L(WP,3)THENl410 

: rem 

1 10 

1240 

X=A+1:Y=B+1:G=LEN(W$(WP))- 

1 :1FM ( Y, X) 


OASC (LEFT$ (W$ (WP) ,1) ) THENl 300 




: rem 

1 11 

1250 

X9=0:FORN=2TOG:GOSUBl620:IFX<10RX>10 


THENl280 

:rem 

49 

1260 

IFY<10RY>10THEN1280 

: rem 

1 77 

1 270 

IFM ( Y, X) =ASC (MID$ (W$ (WP) ,N 

,1))THENl2 


90 

2 rem 

205 
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1280 X9= 1 :N=G :rem 214 

1290 NEXTN:IFX9=0THENl41 0 :rem 21 

1 300 G=6:GOSUBl 750 :PRINTSPC(0);:B$=STR$(L 
(WP,2)):A$=STR$(L(WP,1)) :rem 70 

1310 PRINTRIGHT$(B$,LEN(B$)-1 );",";RIGHT$ 
(A$ >LEN(A$ )-1) :rem 40 

1320 G=8:GOSUBl750:PRINTSPC(1);L(WP,3) 

:rem 22 

1330 G=10 :GOSUBl750:PRINT"t" :rem 156 

1 340 G=11‘.GOSUBl 750: PRINT"J {RVS} NO{OFF} 



II 

: rem 

75 

1350 

G=13 :GOSUBl750:PRINT"{GIU'}PREMI 

" :G = 


13:GOSUBl750:PRINT"{ 2 GIU' 

}SPAZIO" 



: rem 

1 25 

1360 

GETKEY QW$ 

: rem 

95 

1370 

G=10:GOSUB1750:PRINT" " 

:rem 

66 

1380 

G=11:GOSUBl750:PRINT"{ 5 SPAZI}" 




: rem 

68 

1390 

G=13:GOSUBl750:PRINT"{GIU’} 
{ 7 SPAZI }":G = 1 3-.GOSUB1 750: 

PRINT 

II 


{ 2 GIU'}{ 5 SPAZI}" 

:rem 

46 

1400 

GOTO!460 

: rem 

201 

1410 

IFWT<(SL*60)THENWS = 100:GOTOl 440 




: rem 

1 59 

1420 

IFWT<(SL*1200)THENWS=10:GOTO!440 




: rem 

205 

1430 

WS=5+INT((SL*1200)-WT)/60 

: rem 

149 

1440 

G-l0:GOSUBl750:PRINT"T" 

:rem 

158 

1450 

G=11 :GOSUBl750 :PRINT"{RVS}S{OFF} 

» 


{SIN}"WS :TS=TS+WS:FORK3=1T02000: 

NEXT 



: rem 

49 

1460 

G=19:GOSUBl750:PRINTTS 

: rem 

1 74 

1470 

GOTO1010 

: rem 

199 

1 480 

PRINT"{HOME}{ 15 GIU'}" 

: rem 

1 76 


1490 F0RX-1T06:PRINT"{ 12 SPAZI}":NEXTX 




: rem 

48 

1500 

FORG=-2TO14 :GOSUBl750 

: rem 

31 

1510 

PRINT"{ 40 SPAZI}":NEXTG 

:rem 

88 

1520 

FORX = 1TO1500 :NEXTX:PRINT" 

{CLR} M 




: rem 

77 

1530 

COLOR 4,5:COLOR 0,7 

: rem 

41 

1540 

PRINT" {HOME} { 8 GIU'HYEL} 



{ 10 SPAZI}GIOCHI ANCORA? 

(S/N)" 




: rem 

1 55 

1550 

GETKEY R$ 

: rem 

10 

1560 

IFR$="N"THENl590 

: rem 

1 58 

1570 

IFR$="S"THEN210 

: rem 

1 04 

1 580 

IFR$< >"N"ANDR$< >"S"THENl550:rem 

51 

1 590 

PRINT"{CLR}" 

: rem 

51 

1600 

FORX=lTO5000:NEXTX:PRINT" 

{CLR}" : 

COLO 


R 0,1 : COLOR 4,1 

: rem 

219 

1610 

PRINT"{HOME}{ 10 GIU'}{CYN}FINE 

DEL 


GIOCO": END 

: rem 

110 

1620 

ONDGOTO1630,1640,1650,1660,1670, 

1 680 


,1690,1700 

s rem 

122 

1630 

Y=Y-1 

: rem 

23 

1640 

X=X + 1: RETURN 

: rem 

46 

1650 

X=X + 1 

: rem 

21 

1660 

Y=Y + 1; RETURN 

: rem 

50 

1670 

Y=Y + 1 

: rem 

25 

1680 

X=X-1: RETURN 

: rem 

52 

1690 

X=X-1 

: rem 

27 

1700 

Y=Y-1: RETURN 

: rem 

47 

1710 

PRINT"{ 2 DES}"; :IFY=1THENPRINT" 

1 


[<A>)";:GOTOl730 

: rem 

200 

1 720 

PRINT"{<Z>J"; 

: rem 

1 31 


1730 FORX = OTOS-1 :PRINT"*";:NEXTX:IFY=1 THE 
NPRINT"[<S>]":RETURN :rem 250 

1740 PRINT"[<X>]":RETURN :rem 116 

1 750 PRINT"{HOME}"TAB(14); :FORX9 = 1TOG:PRI 
NT"{BLK}{GIU*:NEXTX9:RETURN 

:rem 142 
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di M. Cristuib Grizzi 




Chi, novello acquirente di disk 
drive perché stanco di attendere 
ore per il caricamento dei dati 
nel proprio database, si è accor¬ 
to che quasi tutti i programmi di 
gestione dati in circolazione ma¬ 
neggiano esclusivamente file se¬ 
quenziali si sarà forse pentito di 
aver speso mezzo milione per 
guadagnare ben poco in termini 
di velocità e di tempo. 


I nfatti, la quasi totalità dei programmi 
database di pubblico dominio nasce 
per l’utilizzo del registratore a cassette, 
e l’opzione per l’uso del disk drive, pur 
quasi sempre presente, altro non fa che 
dirigere l’output su questa periferica in¬ 
vece che sul registratore. Il modo con 
il quale vengono gestiti i dati rimane 
quello proprio dell’unità a cassette e 
rappresenta un vero e proprio spreco 
di tempo e velocità per Putilizzatore del 
^rive. 

È comprensibile quindi la delusione di 
chi, dopo aver speso una considerevole 
cifra per l’acquisto del drive, si trova in 
condizioni solo leggermente migliori di 
chi utilizza il registratore a cassette con 
un buon turbo... 

Le possibilità offerte dal drive sono in¬ 
vece molto più ampie e se il programma 
di gestione dati è stato scritto per sfrut¬ 
tarle, si può ottenere un risparmio nel 
tempo di attesa per l’accesso ai dati, 
tale da giustificare ampiamente la spesa 
sostenuta. 

I file relativi, disponibili solo con l’utiliz¬ 
zo del drive ed introdotti nello scorso 
numero della rivista, rappresentano 
uno strumento molto potente per l’ar¬ 
chiviazione di dati su disco. 

Non più un accesso sequenziale ai dati: 
non occorre più leggere cinquecento re¬ 
cord che non interessano per caricare 
il cinquecentounesimo, non più pesan¬ 
tissime limitazioni sul numero dei record 
e la loro lunghezza, a causa del rapido 
decrescere della memoria disponibi¬ 
le... 


Con “Relfiling System 1.0” potrete cari¬ 
care in memoria il record che vi serve 
in meno di un secondo, sia esso il primo 
record del file piuttosto che il millesimo. 
Potrete modificare o riscrivere un qua¬ 
lunque record senza dover risalvare tut¬ 
to il file dati, e potrete disporre di 
un’opzione di ricerca veloce dei record 
che, lavorando in RAM, è dotata di tem¬ 
pi di attesa bassissimi. 

Coaic funziona 

Una volta caricato il programma dalla 
cassetta allegata alla rivista - o digitato 
nel caso non siate in possesso di que¬ 


st’ultima - salvatelo su disco con un no¬ 
me di vostro gradimento. Al RUN vi 
verrà domandato se intendete utilizzare 
la stampante: tenete conto che in caso 
di risposta affermativa la maggior parte 
dell’output, che normalmente avviene 
su video, verrà indirizzato alla stampan¬ 
te. Se rispondete affermativamente, il 
programma domanderà se la vostra 
stampante è collegata tramite interfac¬ 
cia RS-232 oppure no. Se usate la RS- 
232, dovrete quindi inserire, in risposta 
ai prompt del programma, i valori su 
cui impostare il registro di comando e 
quello di controllo della RS-232. Questi 
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valori definiscono i parametri fonda- 
mentali della trasmissione, come baud 
rate, parità, bit di stop, ecc., e dispo¬ 
nendo dalle regolazioni della vostra 
stampante. 

Il line feed automatico comporta un 
avanzamento delle linee dopo ogni ri¬ 
torno carrello, e dipende anch’esso da 
come è regolata la vostra stampante. 
Naturalmente, se usate una stampante 
Commodore, dovrete rispondere con N 
alla domanda “Stampante RS-232?”. 
Per il momento decidiamo di non usare 
la stampante. Premete dunque N alla 
prima richiesta del computer. 

Apparirà il menu principale, composto 
dalle seguenti opzioni: 

1. Creazione nuovo file 

2. Definizione file corrente 

3. Lettura file corrente 

4. Scrittura file corrente 

5. Ricerca di un record 

6. Opzioni di stampa 

7. Memoria libera 

8. Fine operazioni 

Dal momento che non possediamo un 
file dati già pronto, dovremo crearcelo. 
Selezioniamo quindi l’opzione 1. 
Quando si utilizzano dei file dati su disco 
la cosa migliore è quella di dedicare un 
apposito disco al file dati, mentre il pro¬ 
gramma database può essere registrato 
su un qualunque altro disco, insieme ad 
altri programmi di utilità. 

I file relativi possono infatti crescere 
molto velocemente in dimensioni ed oc¬ 
cupare buona parte dello spazio dispo¬ 
nibile sul disco. 

Alla domanda del computer “Inserisci 
disco dati e premi RETURN oppure 
premi spazio per generarlo”, scegliere¬ 
mo di generare il disco dati. Premere 
dunque spazio ed inserire un disco ver¬ 
gine nel drive; dopo alcune conferme di 
procedura il computer vi chiederà il no¬ 
me del database, che assegnerà come 
nome al disco, ed il codice identificatore 
del disco, composto da due caratteri. 
Dopo la formattazione verrà visualizza¬ 
to il numero di blocchi liberi per il file 
dati. Come noterete, questo numero 
non è 664: sei blocchi vengono infatti 
usati per i “side sectors” del file relativo 
(per approfondimenti sull’argomento 
vedi l’articolo “File relativi: potenza e 
semplicità”, apparso sullo scorso nume¬ 
ro). Il disco è ora pronto, non resta che 
definire come vogliamo che sia il nostro 
file di dati. 

Ci serve una rubrica telefonica, un ar¬ 
chivio dischi, un archivio fatture o un 
archivio di magazzino? Nessun proble¬ 
ma, il programma ci crea un file “su 
misura”, per le nostre esigenze. 

Prima di procedere con gli input del 
programma conviene munirsi di un pez¬ 
zo di carta e una matita, e stabilire che 
tipo di dati desideriamo siano trattati 
dal calcolatore. 

Un record è diviso in campi: il classico 
esempio della rubrica telefonica vede 
un record tipicamente diviso in cinque 


campi: cognome e nome, via, città, nu¬ 
mero telefonico, note varie. Un archivio 
fatture potrebbe ad esempio essere for¬ 
mato da record con otto campi: ragione 
sociale, indirizzo, partita IVA, codice fi¬ 
scale, data, motivo, ammontare del- 
l’IVA, totale fattura. Stabilite quindi 
che cosa desiderate archiviare, e scrive¬ 
te sul foglio di carta i nomi dei campi 
che vi servono. Una volta definito il nu¬ 
mero di campi ed il loro nome dovremo 
decidere di quanti caratteri deve essere 
composto ciascun campo: per il codice 
fiscale ci vorranno ad esempio 16 carat¬ 
teri (un numero minore sarebbe insuffi¬ 
ciente, ed un numero superiore sarebbe 
uno spreco di spazio sul disco), per un 
cognome potrebbero bastare 15 carat¬ 
teri e così via. Una volta stabilito esatta¬ 
mente quale aspetto dovrà avere il no¬ 
stro database si potrà rispondere alle 
domande del computer sul numero dei 
campi, il loro nome e la loro lunghezza. 
Si noti che il primo campo viene assunto 
come campo chiave (campo sul quale 
verranno effettuate le ricerche all’inter¬ 
no del database) e dovrà quindi conte¬ 
nere l’informazione più importante del 
record che, quasi sempre, è il cognome. 
La lunghezza del primo campo è limita¬ 
ta a un massimo di 79 caratteri, mentre 
gli altri campi possono avere una lun¬ 
ghezza anche superiore. Si tenga tutta¬ 
via presente che un record non può es¬ 
sere più lungo complessivamente di 
254 caratteri, compreso l’ultimo carat¬ 
tere di fine record, automaticamente 
aggiunto dal programma. 

La somma delle lunghezze dei vari cam¬ 
pì non potrà quindi superare il totale di 
253 caratteri, mentre il numero dei 
campi non è soggetto a vincoli. 

Il programma procederà quindi doman¬ 
dando il numero totale di record. Esso 
non è affatto vincolante, e serve sempli¬ 
cemente per permettere al database di 
allocare sul disco i blocchi necessari a 
contenere il file. Si risponda con un va¬ 
lore che si ritiene prossimo alle proprie 
esigenze, ricordando che il valore che 
si inserisce non è assolutamente vinco¬ 
lante. 

Infine, dovremo scegliere un nome da 
assegnare al nostro file dati: chiamia¬ 
molo “PROVA". 

Dopo un tempo di attesa, necessario 
per creare sul disco il file indice (un 
sequenziale che contiene tutti i parame¬ 
tri più significativi del file dati) e per 
creare lo spazio per il file dati stesso, si 
ritornerà al menu principale. A questo 
punto potremo iniziare ad inserire infor¬ 
mazioni attraverso l’opzione 4: compa¬ 
rirà una linea in campo inverso nella 
parte alta dello schermo contenente le 
opzioni usabili in modo inserimento dati. 

Esse sono: 

tasto ” passa al record precedente 
tasto “+” passa al record successivo 
tasto “£” passa a un record particolare 
tasto “E” ritorna al menu principale 
tasto “I” permette l’inserimento dati 


A questo punto saremo posizionati sul 
record 1. Premiamo il tasto I per l’inse¬ 
rimento dati. Comparirà il nome del pri¬ 
mo campo e tra parentesi la sua lun¬ 
ghezza: saremo pronti per scrivere i no¬ 
stri dati. Se scrivendo raggiungiamo la 
fine del campo, il computer passerà 
automaticamente al campo successivo; 
se invece i dati che desideriamo inserire 
hanno una lunghezza inferiore alla mas¬ 
sima lunghezza del campo, dovremo 
premere RETURN per passare al cam¬ 
po successivo. 

Se non si desidera scrivere su un cam¬ 
po, è sufficiente premere RETURN. Do¬ 
po aver inserito i dati in tutti i campi il 
record verrà scritto sul disco, ed il pro¬ 
gramma si posizionerà sul record suc¬ 
cessivo, in questo caso il numero 2. 

Un record può essere riscritto in qual¬ 
siasi momento, posizionandosi su di es¬ 
so con i tasti “+” e ” oppure con il 
tasto £ (lira), che permette di scrivere 
su un qualunque record, comunicando¬ 
ne il numero al computer. Premendo 
quindi il tasto “I” si potrà riscrivere il re¬ 
cord. 

Scriviamo anche i dati del record 2 e 
ritorniamo al menu principale, premen¬ 
do il tasto “E”. 

Il nostro file conterrà ora due record 
allocati, che potremo leggere con l’op¬ 
zione 3. La schermata che compare è 
analoga a quella di scrittura, ed identi¬ 
che sono le funzioni dei tasti (a parte il 
tasto “I”, che ovviamente non compare 
in questa opzione). Il programma si po¬ 
sizionerà automaticamente sul primo 
record e lo visualizzerà sullo schermo. 
Potremo leggere il secondo sia premen¬ 
do “+” che premendo “£’’ e risponden¬ 
do con 2 alla domanda del computer. 
Dal momento che abbiamo inserito sol¬ 
tanto due record, cercando di leggere 
un record non scritto, ad esempio il nu¬ 
mero 3, il computer ci avviserà che tale 
record è vuoto. 

Premendo “E” ritorniamo al menu prin¬ 
cipale. Esaminiamo ora le opzioni di 
stampa, selezionando l’opzione 6. 

Il menu di stampa è composto dalle se¬ 
guenti opzioni: 

1. Stampa indice contenuto 

2. Stampa singoli record 

3. Stampa l’intero file 

4. Stampa particolari campi 

5. Ritorna al menu principale 

Poiché inizialmente abbiamo deciso di 
non utilizzare la stampante, tutta la 
stampa avverrà su video e potrà essere 
rallentata tenendo premuto il tasto 
CTRL. 

L’opzione 1 provoca la stampa dell’indi¬ 
ce: questo è basato sul campo chiave 
che, come detto, è il primo campo di 
ogni record: verrà stampato il numero 
dei record affiancato dal rispettivo con¬ 
tenuto del primo campo. 

L’opzione 2 funziona in modo assoluta- 
mente analogo all’opzione di lettura dei 
record vista precedentemente, provo¬ 
candone però la stampa; il tasto £ (lira) 
può essere utilizzato per posizionarsi su 
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un qualunque record. 

L’opzione 3 stampa l’intero file, record 
per record e campo per campo. L’op¬ 
zione 4 permette infine la stampa solo 
di un particolare campo, che verrà co¬ 
municato al programma attraverso il 
suo numero (campo 1, campo2, cam- 
po3, ecc.); la stampa avviene per tutti 
i record allocati nel file. 

Ritorniamo al menu principale, selezio¬ 
nando l’opzione 5. 

Una delle caratteristiche più utili dei 
programmi di archivio è la possibilità di 
ricercare un certo record all’interno di 
un file, che magari ne contiene più di 
mille. L’opzione 5 esegue appunto que¬ 
sta funzione. 

11 computer ci chiederà il contenuto del 
campo chiave, che, ricordiamo, è il pri¬ 
mo campo. Volendo ad esempio ricer¬ 
care il record contenente i dati del si¬ 
gnor Rossi, digiteremo “Rossi”. Il pro¬ 
gramma ricercherà quindi, all’interno 
dell’indice del file, quante volte ricorre 
il nome “Rossi”. Se questo nome com¬ 
pare una sola volta (c’è un solo Rossi 
nell’archivio), verrà visualizzato il re¬ 
cord contenente i suoi dati. Se al contra¬ 
rio esistono più record il cui campo chia¬ 
ve contiene il cognome “Rossi”, il pro¬ 
gramma avvertirà che esistono “tot” re¬ 
cord il cui campo chiave è “Rossi”: si 
potrà quindi premere “C” per visualiz¬ 
zarli uno per uno, oppure premere “E” 
per ritornare al menu. 

Una particolarità interessante dell’op¬ 
zione di ricerca è che essa permette di 
ricercare un particolare record sempli¬ 
cemente digitando solo una parte del 
suo campo chiave. Per spiegarci me¬ 
glio, se il file contiene un record per il 
signor Rossi, uno per il signor Rossetti 
e uno per il signor Rosellini, ricercando 
“Rossi” verrà trovato solo il record del 
signor Rossi. Se invece alla domanda 
del computer sul contenuto del campo 
chiave digitiamo “Ross”, il programma 
troverà sia “Rossi” che “Rossetti”. Se 
digitiamo “Ros” verrà invece trovato 
anche “Rosellini”. Se digitiamo “R” ver¬ 
ranno trovati tutti i record che iniziano 
per R. 

Questa particolarità della funzione di ri¬ 
cerca risulta estremamente utile se non 
ricordiamo esattamente un cognome, o 
la forma del dato che ci serve. Ritornia¬ 
mo al menu principale. L’opzione 7 ci 
dice l’ammontare della memoria dispo¬ 
nibile (dopo un tempo di attesa più o 
meno lungo, necessario al computer per 
effettuare i suoi controlli). Dal momento 
che l’indice del file viene mantenuto in 
RAM al fine di sveltire le operazioni su 
di esso, quali la ricerca di un nome, 
vengono dimensionati dei vettori per 
contenere i dati importanti, come il no¬ 
me dei campi, la loro lunghezza, il con¬ 
tenuto del primo campo, ecc. Se il file 
dati diventa molto grosso, è opportuno 
- prima di ogni ampliamento - control¬ 
lare l’ammontare di memoria libera di 
cui si dispone, per evitare uno spiacevo¬ 
le messaggio di “?OUT OF MEMO¬ 
RY”. 


L’opzione 8 è la più importante in asso¬ 
luto. 

Quando abbiamo finito di lavorare su 
un certo file, dobbiamo sempre usare 
l’opzione 8. Essa infatti provvede a scri¬ 
vere sul disco l’indice aggiornato del fi¬ 
le, il suo numero di record allocati ed 
altri importantissimi parametri, che, se 
mancanti, non ci permetterebbero più 
Inaccesso al file dati. 

È opportuno usare questa opzione an¬ 
che se si è aperto il file per sola lettura 
dei dati e non si è operata alcuna modi¬ 
fica. L’uso congiunto delle opzioni 8 e 
3 permette il rapidissimo accesso a file 
differenti, e verrà discusso tra poco. 
Premiamo dunque il tasto 8: il file indi¬ 
ce, aggiornato con i due record che ab¬ 
biamo precedentemente inserito, verrà 
scritto sul disco, ed il programma termi¬ 
nerà la sua esecuzione. 

Diamogli ancora il RUN e decidiamo an¬ 
cora di non utilizzare la stampante. Al¬ 
l’apparizione del menu principale do¬ 
vremo comunicare al programma con 
quale file dati abbiamo intenzione di la¬ 
vorare. Selezioniamo quindi l’opzione 2 
e comunichiamo al programma che in¬ 
tendiamo lavorare sul file “PROVA”. 
Se avessimo sullo stesso dischetto, op¬ 
pure su un altro, dei diversi file dati, 
con questa opzione potremmo accedere 
indifferentemente a uno qualunque di 
questi file. Il computer leggerà il rispet¬ 
tivo file indice e ci comunicherà la com¬ 
posizione del file: suo nome, numero di 
record, numero di campi, loro nome e 
rispettiva lunghezza, ed infine il numero 
dei record allocati. Per il file “PROVA” 
il numero di record allocati sarà 2. Ab¬ 
biamo a questo punto “regolato” il pro¬ 
gramma sul file “PROVA”, e possiamo 
aggiungervi dei dati, leggerne altri o 
compiere qualsiasi altra operazione nel 
modo analizzato precedentemente. Ri¬ 
cordiamo tuttavia sempre di uscire da 
questa “regolazione” del programma 
sempre attraverso l’opzione 8 del menu 
principale. 

Note tecniche 

I file relativi hanno il grande vantaggio 
di rendere possibile l’accesso diretto a 
un qualunque record, semplicemente 
specificandone il numero distintivo. 
Tuttavia, nella maggior parte dei casi, 
l’utilizzo pratico di un archivio richiede 
che un certo record possa essere ricer¬ 
cato in base al contenuto di un certo 
campo, e non in base al suo numero 
progressivo all’interno del file, in quan¬ 
to quest’ultimo è del tutto sconosciuto 
all’utente. 

II problema si risolve creando un indice 
del file, che raccoglie sequenzialmente 
i contenuti di tutti i campi chiave dei 
vari record. Il vettore CC$, dimensiona¬ 
to sul numero previsto di record, racco¬ 
glie appunto il contenuto del primo 
campo di tutti i record del file. La posi¬ 
zione di un certo dato all’interno del 
vettore coincide con il numero del re¬ 
cord relativo. Se ad esempio CC$(3) è 
uguale a “Rossi”, il programma saprà 


che il record contenente i dati del signor 
Rossi è il numero 3 e cosi via. Questo 
sistema di indicizzazione è quello utiliz¬ 
zato dal database qui presentato, ed è 
caratterizzato da un prò e un contro. Il 
prò è che si riesce a gestire l’indice con 
un solo vettore dimensionato sul nume¬ 
ro di record, limitando al minimo l’occu¬ 
pazione di memoria ed aumentando di 
conseguenza il massimo numero di re¬ 
cord gestibile dal programma. 11 contro 
è che questo sistema non permette ordi¬ 
namenti alfabetici dell’indice, in quanto 
verrebbe sconvolto il legame tra conte¬ 
nuto del campo chiave e numero del 
record: facendo un sort all’interno di 
CC$ nell’esempio precedente, probabil¬ 
mente “Rossi” andrebbe a capitare in 
posizione - poniamo - 234, mentre il suo 
record rimarrebbe comunque il numero 
3. Per rendere possibile l’ordinamento 
bisognerebbe prevedere una matrice bi¬ 
dimensionale invece di un vettore, 
CC$(n,n), dove la prima colonna sia 
composta dal contenuto dei campì chia¬ 
ve e la seconda dal relativo numero di 
record. L’opzione di ordinamento si pa¬ 
ga quindi in termini di maggior occupa¬ 
zione di memoria e conseguentemente 
minor numero di record gestibili dal da¬ 
tabase. 

A proposito di massimo numero di re¬ 
cord, esso è limitato solo dall’occupa¬ 
zione di memoria dei vettori dimensio¬ 
nati dal programma, e varia quindi in 
funzione del numero di campi che viene 
definito dall’utente. Se inizialmente si 
decide di creare un file con 100 record 
e li si riempiono tutti in breve tempo, 
non sarà più richiesta alcuna particolare 
operazione sul file per ottenere la sua 
estensione: basterà iniziare a scrivere 
sul lOlesimo record, sul 102esimo e 
così via. Il programma si regola automa¬ 
ticamente con il crescere dell’estensio¬ 
ne del file. 

Un’altra curiosità del programma è l’im¬ 
magazzinamento in memoria del nume¬ 
ro di canale della stampante con istru¬ 
zioni POKE e non con delle semplici 
variabili: a causa della possibilità offerta 
dal programma di passare agevolmente 
da un file dati all’altro, sono necessari 
molti CLR per azzerare i dimensiona- 
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menti dei vettori. Poiché un’istruzione 
CLR azzera anche i! contenuto di tutte 
le variabili, e chiude tutti i canali di co¬ 
municazione con le periferiche, se il nu¬ 
mero di canale della stampante è invece 
contenuto in una locazione di memoria, 
non risente di questo generale azzera¬ 
mento. 

Ecco ora un elenco delle principali 
variabili e dei vettori utilizzati nel pro¬ 
gramma principale: 


RN 

numero di record 

PO 

posizione di lettura record 

TY 

numero di record allocati 

HB 

byte alto puntatore al record 

F$ 

nome del file dati 

LB 

byte basso puntatore al record 

RL 

lunghezza dei record 

E1S 

numero codice di errore del drive 

C 

numero dei campi 

E2$ 

messaggio di errore del drive 

N$() 

nome dei campi 

E3S 

messaggio di errore maiuscolo 

LO 

lunghezza dei campì 

BY 

ammontare byte liberi 

ceso 

contenuto dei campi chiave 

LS 

lunghezza di una stringa 

RCS 

contenuto del record 

CT() 

vettore lavoro per ricerca record 

PR 

canale stampante 

F 

variabile di flag 

R$ 

ritorno carrello 

A 

codice ASCII di un tasto 


Relfiling System 1.0 


1 

REM 

*********************************** 

230 

PRINTA$;"{GIU'}3. STAMPA 

L’INTERO 






z rem 

21 1 


{ 7 SPAZI}FILE" 

z rem 

34 

2 

REM 

* 

RELFILING SYSTEM 

1.0 

* 

240 

PRINTA?;"{GIU’}4. STAMPA{ 

16 SPAZI}PA 





: rem 

1 22 


RTICOLARI CAMPI" 

z rem 

1 00 

3 

REM 

* 

UN SISTEMA DATABASE 

* 

250 

PRINTA$;"{GIU'}5. RITORNA 

AL MENU 






: rem 

89 


{ 7 SPAZI{PRINCIPALE" 

: rem 

1 96 

4 

REM 

* 

CON UTILIZZO DEI 

FILE 

* 

260 

GOSUBl110:IFA<49ORA>53THEN260 






: rem 

200 



z rem 

221 

5 

REM 

* 

RELATIVI E DISK DRIVE 

* 

270 

ONA-48GOSUB300,440,360,460 trem 

11 4 





z rem 

1 83 

280 

GOTO1210 

z rem 

1 51 

6 

REM 

* 

1541 - MCG 1985 

PER 

* 

290 

REM “STAMPA INDICE** 

z rem 

1 53 





z rem 

251 

300 

IFCC$ (1 ) <>""ANDCCS (2)0"" 

ANDCCS(3)<>" 

7 

REM 

* 

SUPERCOMMODORE 


* 


"THEN320 

z rem 

77 





z rem 

163 

310 

PRINT"{CLR}INDICE NON IN 

MEMORIA!" 

: GO 

8 

REM 

*********************************** 


SUBÌ 410 :GOTOl90 

z rem 

94 





z rem 

21 8 

320 

PRINT#PR,"FILE:"F$:PRINT#PR,"RECORD A 

9 

REM 



: rem 

29 


LLOCATI :"TY:PRINT#PR:PRINT#PR 



1 o 

20 

30 

40 

50 

60 

70 

80 

90 
1 00 

110 

1 20 

1 30 

1 40 

1 50 

160 

1 70 
1 80 
190 

200 

210 


PRINTCHR$(14):POKE36879,8:PRINT"{WHT}” 
:GOTO70 treni 109 

PRINT"{CLR}ATTENDERE...":BY=FRE(0)-(FR 
E(0) <0) *655l6 treni 87 

PRINT"{CLR}"BY"BYTE LIBERI":GOSUBl410: 
GOTO1210 :rem 72 

REM “LA LOCAZIONE 1000 CONTIENE IL # 
DI CANALE PER LA STAMPANTE** treni 65 

REM * * LA LOCAZIONE 1001 CONTIENE IL RE 
GISTRO DI CONTROLLO RS-232** treni 239 

REM **LA LOCAZIONE 1002 CONTIENE IL RE 

54 


GISTRO DI COMANDO RS-232** treni 
INPUT"{CLR}UTILIZZO STAMPANTE 
{ 2 SPAZI}SI 3 SIN}";A$ treni 79 

IFA$<>"S"THENPOKEl000,2:GOTOl70 

treni 245 

REM *‘OPZIONE RS-232** treni 130 

INPUT"RS-232{ 2 SPAZl}N{ 3 SIN}";A$ 

treni 147 

IFA$O"S"THEN0PEN4,4,7: POKEl 000,4 : GOT 
0170 treni 132 

INPUT"REG.CONTROLLO"; A:A$=CHR$(A) tPOK 
El 001 ,A treni 50 

INPUT"REG.COMANDO";B:B$=CHR$(B)tPOKEl 
002, B treni 125 

INPUT"AUTO LINEFEED{ 2 SPAZI}S 
{ 3 SIN}";C!? : rem 170 

IFC$ < >"S"THENOPEN3 2,2,0,A$ +B$:POKE1 0 0 
0,32:GOTOl70 treni 5 

IFC$="S"THENOPEN232,2,0,A$+B$:POKEl00 
0,232 : r em 34 

OPENl5,8,15:OPEN2,3 :GOTOl210 : rem 90 
REM ‘‘OPZIONI DI STAMPA** treni 160 
PRINT"{CLR}{RVS}{ 2 SPAZI} OPZIONI DI 
STAMPA{ 3 SPAZI}{GIU'}" :rem ~?8 
A$ = " " : B$ = " " : PR=PEEK (1 000 ) treni 233 
PRINTB$;A$;"1. STAMPA INDICE DEL 
{ 5 SPAZI}CONTENUTO" treni 138 


220 PRINTAS;"{GIU'}2. STAMPA 
{ 8 SPAZI}RECORD" 


SINGOLI 

treni 14 4 


330 

340 

350 

360 


370 

380 

390 

400 

410 

420 

430 

440 

450 

460 

470 

480 

490 

500 

510 

520 

530 

540 

550 


treni 158 

FORI=lTOTY:PRINT#PR,"RECORD N.";ItPRI 
NT#PR,"CHIAVE: "CCS (I) :NEXT treni 98 
PRINT#PR:RETURN : rem 3 

REM “STAMPA L'INTERO FILE** treni 78 
OPENl ,8,2,"0 :"+F$:PRINTtPR," FILE :"F$: 
PRINTIPR,"RECORD:"TY:PRINT#PR:PRINT#P 
R tram 39 

FORICITOTY:RC$="":PRINT#PR:PRINT#PR," 
RECORD N.";I;":":PRINT#PR treni 136 
HB=INT( 1/256) :LB=I-HB*256 treni 127 
PO=l:GOSUBl190 :PS = 1 :FORK = lTORL 

: rem 

GET#1 , A$ :RC$=RC$+A$ tNEXT treni 
FORK=1 TOC :PRINT#PR,N$(K)"t 
PS,L(K)):PS=PS+L(K)tNEXT treni 
NEXTItCLOSEl:PRINT#PR:RETURNtrem 
STAMPA RECORD SINGOLO** 

: rem 
: rem 

PARTICOLARI CAMPI** 

: rem 

REM : rem 

PRINT"{CLR}"; t FORI = 1 TOC:PRINTI,N$(I) : 
NEXT treni 185 

INPUT"{GIU*}NUMERO DEL CAMPO"; A : IFA>C 


REM 


GOTO2 340 
REM *‘STAMPA 


1 48 
75 

"MIDS(RCS, 
147 
165 

1 95 
1 54 

1 43 
1 26 


ORA=0THEN480 
L=1:FORK=2TOA+l 


61 


: rem 

L=L+L(K-2)tNEXT 
: rem 

OPENl,8,2,"0 :"+FS:FORI = lTOTY: rem 
HB=INT(1/256) :LB=I-HB*256 :PO=L 

: rem 

GOSUBl 1 90:RC$ = "" treni 

FORK = lTOL(A) :GET#1 ,A$: IFA$=CHR$(160)T 
HENK=L (A) treni 161 

RC$=RC$+A$ : NEXTK : PRINT treni 99 

PRINT#PR,"REC.N."I :PRINT#PR,RC$:PRINT 
#PR:NEXTI trem 232 


1 08 
81 

220 

86 
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560 

CLOSEl : RETURN 

: rem 

92 

570 

REM “RICERCA DI UN 

RECORD**:rem 

16 

580 

INPUT"{CLR{CAMPO CHIAVE";A$:CF=0: 

FORI 


= 0TOTY:CT(I)=0 :NEXT 

: rem 

236 

590 

PRINT"{GIU'{RICERCA 

IN CORSO...{GIU'} 


II 

: rem 

1 77 

600 

FORI = lTOTY:IFCCS (I) = 

""THENI=RN 




:rem 

103 

610 

IFA$=LEFT$(CCS(I),LEN(A$))THENCF= 

CF+1 


:CT(CF)=1 

: rem 

1 20 

620 

NEXT 

: rem 

21 5 


630 IFCF=OTHENPRINT"{GIU'{NESSUN RECORD C 
HE{ 4 SPAZI}INIZI CON":PRINT"{RVS}"A$ 
:G0SUB1410:RETURN :rem 153 

640 IFCF=1THEN700 :rem 230 

650 PRINT"{GIU'}ESISTONO"CF"RECORO CHE IN 
IZIANO CON":PRINT"{RVS}"A$ :rem 144 
660 PRINT"PREMERE C PER VISUALIZZARLI" 

:rem 160 

670 PRINT"{ 8 SPAZI}E PER USCIRE" 

:rem 229 

680 GOSUBl 1 1 0: IFAO69ANDAO67THEN680 

:rem 156 

690 IFA= 69THENRETURN :rem 42 

700 PRINT"{CLR}";:OPENl,8,2,"0:"+F$:FORI = 
1TOCF:RC$ = "":PRINT#PR,"RECORD N.";CT( 
I) :rem 31 

710 PRINT#PR : rem 234 

720 HB=INT(CT(I)/256) :LB=CT(I)-HB*256 

:rem 77 

730 PO=l:GOSUBl190:PS=1:FORK=lTORL 

:rem 146 

740 GET#1,A$:RC$=RC$+A$:NEXT :rem 82 

750 FORK=!TOC :PRINT#PR,N$(K)": "MID$(RC$, 
PS,L(K)):PRINTIPR:PS=PS+L(K):NEXT 

:rem 38 

760 PRINT"{GIU'{PREMERE UN TASTO PER 

{ 2 SPAZI{PROSEGUIRE"rGOSUBll10:NEXTI 
:CLOSElrRETURN :rem 99 

770 REM **SUBROUTINE INPUT CONTROLLATO ** 

:reni 27 

780 REM “PARAMETRI IN USCITA DI QUESTA R 
OUTINE* * :rem 182 

790 REM ** B$: STRINGA* 

* :rem 228 

800 REM ** LS: LUNGHEZZA STRINGA* 

* :rem 205 

810 REM **PARAMETRI IN ENTRATA DI QUÉSTA 

ROUTINE** : rem 246 

820 REM ** L(W) : LUNGHEZZA CAMPO* 

* :rem 124 

830 PRINT"INSERISCI (TERMINA CON ' RETURN 

' ) : PRINT: F = 1 :B$ = "" :LS=0:A$=" *' :A = 0 

:rem 98 

840 GETAS:IFA$=""THEN840 :rem 91 

850 A=ASC(A$+CHR$(0)) :rem 85 

860 IFA$=CHR$(20)THENLS=LS-1 :F = 0:B$=LEFT$ 
(B$,LEN(BS)-1):GOTO900 :rem 135 

870 IFA$=CHR$(13)THENF=0:GOTO940: rem 120 
880 IF(A>31ANDA<95)OR(A>159ANDA<233)THEN9 
00 :rera 225 

890 PRINT:PRINT"CARA{ 2 T}ERE NON CONSEN 
TITO!":PRINT:GOTO830 :rem 187 

900 PRINTAS; : rem 198 

910 IFF=1THENB$=B$+A$:LS=LS+1:IFLEN(B$)=L 
(W)THENRETURN :rem 85 

920 F=1:GOTO840 :rem 94 

930 REM ‘‘AGGIUNGE SPAZI SHIFTATI FINO A 
LUNGHEZZA CAMPO** : rem 231 

940 A=LEN(B$):D=L(W)-A:IFA=0THENRETURN 

:rem 84 


950 IFD>0THEN970 :rem 174 

960 IFD<0THENB$=LEFT$(B$,L(W)) : RETURN 

:rem 240 

970 A$=CHR$(160) :C$ = "": FORI = 1TOD:C$=C$ + A$ 
:NEXT:B$ =BS+C$: RETURN :rem 73 

980 OPEN3,8 » 3, "0 :I"+FS+",S,R":GOSUBl140 

:rem 109 

990 IFEl$<>"00"THENGOSUBl410:RUN:rem 141 
1000 PRINT"{SU{LETTURA FILE INDICE...{SU} 
" : rem 171 

1010 INPUT#3,RN,RL,C , TY:DIML(C),N$(C),CC$ 
(RN),CT(RN) : rem 39 

1 020 FORI = lTOC : INPUT# 3, N$(I) ,L(I) :NEXT 

:rem 42 

1030 FORI=lTOTY:INPUT#3,CC$(I):A=ASC(LEFT 
$(CCS(I),1)+CHR$(0)) : rem 16 

1040 NEXT:CLOSE3 :rem 231 

1050 PRINT#PR , "{CLR{FILE:"F$:PRINT#PR,"N 
.RECORD:"RN :rem lT2 

1 060 PRINT#PR,"{GIU 1 }LUNGH.RECORD :"RL:PRI 
NT#PR,"CAMPI :"C"TgiU'}" :rem 21 

1070 FORI = 1 TOC:PRINT#PR,"CAMPO"; I ;":";N$( 
I):PRINT#PR,"LUNGH. : T L(I) :NEXT 

:rem 125 

1080 PRINT#PR:PRINT*PR,"RECORD ALLOCATI:" 

TY : rem 134 

1090 PRINT"{ 2 GIU'{PREMERE UN TASTO PER 
{ 2 SPAZI{ PROSEGUIRE ":GOSUBl110 : GOTO 
1210 :rem 27 

1100 REM *‘SUBROUTINE ATTESA PRESSIONE DI 
UN TASTO** : rem 147 

Ilio GETAS:IFA$=""THENl110 : rem 169 

1120 A=ASC(AS+CHRS(0)):RETURN :rem 150 

1130 REM “SUBROUTINE LETTURA CANALE ERRO 
RI DEL DRIVE** : rem 72 

1140 INPUT#15,E1$,E2$,E3$,E4$:PRINT" 

{GIU*{ERRORI:"; :rem 97 

1150 PRINTEl$ ;" {RVS}"; :E3$ = "" :rem 17 

1160 FORI=lTOLEN(E2$):E3$=E3$+CHR$(ASC(MI 
D$(E2$,1,1))+128):NEXT:PRINTE3$ 

:rem 134 

1170 RETURN ;r em 169 

1180 REM “SUBROUTINE POSIZIONAMENTO PUNT 
ATORE AL RECORD** : rem 179 



1 . ion# nuovo 


. Definirion* f11* 
oonr^nt» 

3. L-mr-t, ci» 1 ■Pii* 

oonr»nt* 

4 . Sor lttur* su 1 4*11» 

oorrsnxs 

». R i osro* di «-in 

r#oord 

€> . Oioz Ioni di 

7. Memori» 1lb#r* 

8. Fin# op*r*xloni 
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1190 PRINT#15,"P"+CHR$(2+96)+CHR$(LB)+CHR 
$(HB)+CHR$(PO): RETURN : rem 50 

1 200 REM “MENU PRINCIPALE** : rem 107 
1210 PRINT"{CLR}{RVS}RELFILING SYSTEM 1.0 

{ 2 SPAZI}" : rem 202 

1220 A$="":3$="":PR=2 :rem 23 

1230 PRINTB$;A$;"1. CREAZIONE NUOVO 

{ 7 SPAZI}FILE" : rem 14 

1240 PRINTA$;"{GIU'}2. DEFINIZIONE FILE 

{ 6 SPAZI}CORRENTE" :rem 223 

1250 PRINTA$;"{GIU'}3. LETTURA DEL FILE 

{ 6 SPAZI}CORRENTE" : rem 163 

1260 PRINTA$;"{GIU'}4. SCRITTURA SUL FILE 

{ 4 SPAZI}CORRENTE" :rem 100 

1270 PRINTA?;"{GIU'}5. RICERCA DI UN 

{ 9 SPAZI}RECORD" : rem 2 3 

1280 PRINTA$;"{GIU'}6. OPZIONI DI STAMPA" 

: rem 172 

1290 PRINTA$;"{GIU'}7. MEMORIA LIBERA" 

:rem 236 

1300 PRINTA$;"{GIU'}8. FINE OPERAZIONI" 

:rem 78 

1310 GOSUB1110 :IFA< 4 90RA>56THEN1310 

:rem 58 

1320 ONA-48G0T01420,1350,2340,2090,1330,1 
90,20,2550 : rem 93 

1330 GOSUB580 :rem 228 

1 340 GOTOl210 : rem 197 

1 350 CLR:OPEN2,3 :PR=PEEK(1000) :IFPR=4THEN 
OPEN4,4,7 :rem 43 

1360 IFPEEK(1000)=32THENOPEN32,2,0,CHRS(P 
EEK(1001))+CHRS(PEEK(1002)):PR= 

: rem 156 

1370 IFPEEK(1000)=232THENOPEN232,2,0,CHR$ 
(PEEK(1001))+CHR$(PEEK(1002)):PK=232 

:rem 51 

1380 INPUT"{CLRjNOME FILE";F$:OPENl5,8,15 

: rem 111 

1390 PRINT"{GIU'}OK.":G0T098Q :rem 139 

1 400 REM * *SUBROUTINE CICLO DI ATTESA** 

: rem 26 

1410 FORI = 1T02000:NEXT: RETURN :rem 92 

1420 REM ‘‘INIZIALIZZAZIONE DEL PROGRAMMA 
** :rem 161 

1430 PRINT"{CLR}INSERIRE IL DISCO DATIE P 
REMERE RETURN" : rem 107 

1 440 CLR:OPEN2,3 :PR=PEEK(1 000) :IFPR=4THEN 
OPEN4,4,7 : rem 43 

1450 IFPEEK(1000)=32THENOPEN32,2,0,CHR$(P 
EEK(1001))+CHRS(PEEK(1002)):PR=32 

: rem 156 

1 4 60 IFPEEK(1 000)=232THENOPEN232,2,0,CHR$ 
(PEEK(1001))+CHR$(PEEK(1002)):PR=232 

:rem 51 

1470 PRINT"OPPURE PREMERE SPAZIO PER GENE 

RARLO":PRINT:OPENl5,8,15 :rem 115 

1480 GETA$:IFA$=""THENl480 :rem 189 


1 490 
1 500 
1 51 0 
1 520 

1 530 

1 540 

1 550 

1 560 
1 570 

1 580 


1 590 
1 600 

1 610 
1 620 


1 630 
1 640 

1 650 
1 660 
1 670 
1 680 
1 690 

1 700 
1 71 0 
1 720 

1 730 

1 740 
1 750 

1 760 
1 770 


1 780 


IFA$=CHR$<13)THENl 650 :rem 176 

IFA$=CHR$(32)THENl520 :rem 165 

GOTO!480 :rem 205 

PRINT"{GIU'}LA CREAZIONE DEL DISCODA 
TI COMPORTA LA" : rem 178 

PRINT"PERO ITA DEI DATI{ 6 SPAZI}EVEN 
TUALMENTE" : rem 116 

PRINT"PRESENTI SUL DISCO{ 4 SPAZI}ST 
ESSO." : rem 122 

INPUT"{ 2 GIU'} SEI SICURO (S/N)";A$ 

: rem 184 

IFA$<>"S"THENRUN : rem 245 

INPUT"{GIU'}NOME DEL DATABASE 
{ 3 SPAZI}";A$ : rem 11 

IFLEN(A$)>16QRLEN(A$)<1THENPRINT"DA 
1 A 16 CARA { 2 T} ERI !":GOTOl570 

: rem 152 

INPUT"CODICE ID";B$ : rem 248 

IFLEN(B$)<>2THENPRINT" C0DICE UI 2 C 
ARA{ 2 T}ERI !" : GOTO1 590 :rem 128 

PRINTtl5,"NO :"+A$+","+B$ :rem 194 

PRINT"{GIU'}FORMATTAZIONE IN CORSOA 
TTENDERE." : rem 1T7 

GOSUBl14 0 : rem 16 

REM “LETTURA NUMERO DI BLOCCHI LIBE 
RI SUL DISCO** : rem 236 

OPEN3,8,0,"$0:%S>%":I = 0 :rem 79 

FORI = 1T0 34:GET#3,A$:NEXT : rem 239 

GET# 3,A$:A=ASC(A$+CHR$(0)) : rem 135 

GET#3,A$:B=ASC(A$+CHR$(0)) : rem 137 

SC=(A+B* 2 56)- 6 :PRINTSC"BLOCCHI LI BER 
I":PRINT"PER IL FILE DATI.":rem 15 

CLOSE3 : rem 113 

GOSUBl140 : rem 15 

REM “DEFINIZIONE DEL FILE** 


:rem 127 

INPUT"QUANTI CAMPI";C:PRINT:DIMN$(C) 
,L(C) : rem 198 
RL= 0 :FOR1 = 1 TOC :rem 149 
PRINT"{RVS}CAMPO N.{OFF}"I :PRINT 

: rem 190 

INPUT"NOME";N$(I) : rem 152 
INPUT"LUNGHEZZA";L(I):IFI=1ANDL(I)>7 
9THENPRINT"MAX.79 SUL PRIMO CAMPO":G 
OTO1 770 : rem 148 
RL=RL+L(I):PRINT:NEXT : rem 154 
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1790 RL=RL+1:PRINT"LUNGHEZZA TOTALE DI UN 
RECORD:"; :PRINTRL"CARATTERI.":PRINT 

:rem 83 

1800 IFRL>254THENPRINT"RECORD TRO{ 2 P} 

O LUNGHI ! FORI = ITO 5.000 :NEXT:RUN 

:rem 66 

1810 REM **CREA IL FILE RELATIVO** 

:rem 140 

1820 RN=0:INPUT"NUMERO DI RECORD";RN:RN=R 
N+l:PRINT : rem 61 

1830 IFRN*RL/254<=SCTHENl860 :rem 154 

1840 PRINT"{CLR} FILE {SPAZI} TRO { 2 P}0 
{SPAZI} GRANDE {SPAZI} PER {SPAZiJe 



{ 2 S}ERE CONTENUTO" 

: rem 

21 1 

1850 

PRINT"SU QUESTO DISCO!" 

:FOR1 = 1TO 5000 


:NEXT:RUN 

: rem 

35 

1 860 

DIMCCS(RN),CT(RN) 

: rem 

248 

1 870 

INPUT"NOME DEL FILE";F$ 

:IFLEN(F$)>0A 


NDLEN(F$)<15THEN1900 

: rem 

1 98 

1 880 

PRINT"DA 1 A 14 CARA{ 2 

T}ERI !": 

GOTO 


1 870 

: rem 

1 

1 890 

REM *‘CREAZIONE DEL FILE RELATIVO SU 


DISCO** 

: rem 

11 5 

1 900 

PRINTil5,"IO" 

: rem 

201 

1910 

PRINT"{CLR}CREAZIONE FILE INDICE 

" : TY 


= 0 

: rem 

111 

1 920 

OPEN3,8,3,"@0:1"+F$+",S 

,W":GOSUBl140 



: rem 

221 

1930 

R$=CHR$(13) :PRINT# 3,RN; 

R$ } RL } R $f 

C; R$ 


; TY 

: rem 

113 

1 940 

FORI = 1 TOC:PRINT#3,N$(I) 

; R$ ; L ( I ) : 

NEXT 



: rem 

242 

1950 

FORI=lTOTY:IFCC$(I)=""THENCC$(I) 

=CHR 


$(255) 

: rem 

233 

1 960 

PRINT#3,CC$(I):NEXT 

: rem 

1 56 

1 970 

CLOSE3 

: rem 

1 22 

1 980 

HB=INT(RN/256) 

: rem 

65 

1 990 

LB=RN-HB* 2 56 

: rem, 

1 88 

2000 

PRINT"{ 2 GIU’}CREAZIONE FILE DATI" 



: rem 

23 

2010 

OPENl , 8,2,"0 :"+F$+", L, " 

+CHR$(RL) 




: rem 

1 33 

2020 

PO=l:GOSUBl190 

: rem 

86 

2030 

PRINTil,CHR$(255) 

: rem 

1 92 

2040 

PO=l:GOSUBl190 

: rem 

88 

2050 

CLOSEl 

: rem 

1 10 

2060 

GOSUBl140:IFEl$<>"50"ANDEl$<>"00 

"THE 


NEND 

: rem 

37 

2070 

GOSUBl410:GOTO!210 

: rem 

70 

2080 

REM *‘PREPARA PER LA SCRITTURA** 




: rem 

1 50 

2090 

R=TY+1 

: rem 

99 

2100 

PRINT"{CLR}{RVS}+ SU{ 2 

C}. - PREC. 


£ SINGE ESCE{ 8 SPAZI}l 

INSER. " 




: rem 

1 75 

2110 

PRINT#PR,"RECORD #"R 

: rem 

1 86 

21 20 

PRINT"{GIU’}SCELTA?" 

: rem 

34 

21 30 

GOSUBl 1 1 0: IFA043ANDA045ANDA092AND 


A069ANDA073THEN21 30 

: rem 

206 

2140 

IFA=43THENR=R+1:GOT02100 :rem 

221 

21 50 

IFA=4 5THENR=R-1 :IFR<1THENR=1 




: rem 

35 


2160 

IFA=45THEN2100 

: rem 

49 

2170 

IFA= 92THENINPUT"N. RECORD" 

;R:GOTO210 


0 

: rem 

1 95 

21 80 

IFA=69THENCLOSEl:GOTOl210 

: rem 

84 

21 90 

REM 

: rem 

1 76 

2200 

RC$ = "":FORW=lTOC :PRINTIPR: 

B$ = ’’ " 




: rem 

119 

221 0 

PRINTN$(W)"("L(W)"CARATT.) 

:":GOSUB83 


0:IFW=lTHENCC$(R)=B$ 

: rem 

98 

2220 

RC$=RC$+B$ 

: rem 

6 

2230 

NEXT 

: rem 

6 

2240 

REM “SCRIVE SUL FILE** 

: rem 

52 

2250 

REM 

: rem 

1 73 

2260 

OPENl,8,2,"0:"+F$ 

: rem 

94 

2270 

HB=INT(R/256) 

: rem 

236 

2280 

LB=R-HB* 2 56 

: rem 

103 

2290 

PO=l:GOSUBl190 

: rem 

95 

2300 

PRINT#1,RC$:PO=l:GOSUBl190 

: rem 

87 

2310 

CLOSEl:GOSUBl140:R=R+1:TY= 

TY+1 




: rem 

145 

2320 

GOT02100 

: rem 

1 95 

2330 

REM “LEGGE SEQUENZIALMENTE IL FILE 


RELATIVO** 

: rem 

77 

2340 

R= 1 

: rem 

1 37 

2350 

PRINT"{CLR}{RVS}+ SU{ 2 C} 




{ 10 SPAZI}- PRECE SING{ 10 SPAZljE 


ESCE" 

: rem 

98 

2360 

RC$="":PRINT#PR f "RECORD #" 

;R:PRINTtP 


R 

: rem 

252 

2370 

IFR>TYTHENPRINT"RECORD VUOTO! ’’ :GOSUB 


1410:GOTO2470 

: rem 

85 

2380 

HB=INT(R/256) 

: rem 

238 

2390 

LB=R-HB*256 

: rem 

1 05 

2400 

OPENl,8,2,"0 :"+F$ 

: rem 

90 

2410 

PO=l:GOSUBl190:PS=1:FORI=lTORL 




: rem 

1 89 

2420 

GET#1,A$:RC$=RC$+A$:NEXTI: 

CLOSEl 




: rem 

1 69 

2430 

FORK = 1 TOC :PRINT#PR»N$ (K) ’’: 

"MID$(RC$ 


,PS,L(K)):PRINTiPR:PS=PS+L(K) 




: rem 

21 8 

2440 

IFKOl THEN2460 

: rem 

74 

2450 

CC$(R)=LEFT$(RC$,L(1)) 

: rem 

168 

2460 

NEXT:PRINT# PR:GOSUBl140 

: rem 

23 

2470 

PRINT"{GIU'JSCELTA?":GOSUBl110 




:rem 

1 67 

2480 

IFA<>4 3ANDA< >4 5ANDAO 92ANDA< >69THENG 


OSUBl110:GOTO2480 

: rem 

31 

2490 

IFA=43THENR=R+1:GOTO2350 

: rem 

236 

2500 

IFA= 4 5THENR = R-1 :IFR<1THENR 

= 1 

* 



: rem 

34 

2510 

IFA=45THEN2350 

: rem 

55 

2520 

IFA=92THENINPUT"N• RECORD" 

;R:G0T0235 


0 

: rem 

201 

2530 

IFA=69THENCLOSEl:GOTOl210 

: rem 

83 

2540 

REM “RISCRITTURA FILE INDICE** 




: rem 

127 

2550 

PRINT"{CLR}SCRITTURA FILE 

INDICE 

•• 



: rem 

1 99 

2560 

IFTY> RNTHENRN = TY 

: rem 

1 60 

2570 

OPEN3,8,3,"@ 0 :1"+F$+",S,W" 

:GOSUBl140 



: rem 

223 

2580 

R$=CHR$(13):PRINT#3,RN;R$; 

RL;R$; 

C ; R$ 


; TY 

: rem 

1 1 5 

2590 

FORI = 1 TOC :PRINT#3,N$(I) ; R$ 

; L ( I ) : 

NEXT 



: rem 

244 

2600 

FORI = 1 TOTY : IFCC$ (I) ='”’THENCC$ (I) 

=CHR 


$ (255) 

treni 

226 

261 0 

PRINT#3,CCS(I):NEXT:CLOSE3 

: rem 

120 

2620 

END 

: rem 

161 
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trad. ed adatt. 

di M. Cristaib Grizzi 



SUPERCOMMODORE è lieta di 
presentare SPEEDSCRIPT 3.0, 
an programma di word proces¬ 
sing scritto interamente in lin- 
gnaggio macchina, che rappre¬ 
senta la versione evolnta dello 
SPEEDSCRIPT pubblicato sai 
namero di Novembre 1984 di 
SUPERVIC. 


A vendo tutte le caratteristiche tipi 
che dei programmi professionali di 
word processing per personal compu 
ter, SPEEDSCRIPT 3.0 si avvicina in 
qualità a programmi commerciali del 
costo di 150000 lire ed oltre, a testimo¬ 
niare il nostro sforzo coerente con l’im¬ 
pegno assunto di fornire ai nostri lettori 
software sempre più di qualità. Il pro¬ 
gramma gira sul VIC 20 con espansione 
da almeno 8 Kbyte. SPEEDSCRIPT 3.0 
amplificherà considerevolmente il cam¬ 
po di utilizzo del vostro computer, 
innanzi tutto, che cos’è un word proces¬ 
sor e che cosa lo differenzia da una mac¬ 
china per scrivere elettrica? La differen¬ 
za è la stessa che separa una carrozza 
a cavalli dall’ultimo modello di Ferrari: 
con il word processor si possono opera¬ 
re tutte le correzioni possibili sui testi 
prima di eseguire la stampa definitiva, 
spostare a piacimento interi paragrafi 
qua e là nel testo con alcuni semplici 
comandi, memorizzare un libro di 100 
pagine in un dischetto da 5 pollici, pro¬ 
durre istantaneamente un testo format¬ 
tato, a spaziatura doppia e con la nume¬ 
razione automatica delle pagine... E 
queste sono solo alcune delle enormi 
possibilità di un word processor! 

Il computer, per sua natura, si presta 
molto bene ad essere usato per la crea¬ 
zione ed il trattamento di testi, ed i pro¬ 
grammi word processor ne sfruttano 
tutte le possibili potenzialità. Per rende¬ 
re il vostro computer simile a una mac¬ 
china per scrivere elettrica basterebbe 
questo semplicissimo programmino di 
quattro linee: 

10 OPEN 1,4 
20 INPUT A$ 



30 PRINT# l.AS; 

40 GOTO 20 

Se date il RUN, appare il cursore lam¬ 
peggiante, il quale aspetta che venga 
battuta una linea. Quando battete RE¬ 
TURN la linea viene mandata alla stam¬ 
pante; potete muovere il cursore a sini¬ 
stra e sostituire caratteri errati, oppure 
usare il tasto INST/DEL per operare 
modifiche alla linea di testo prima di 
premere il RETURN e stamparla. Ma 
una volta che la linea si trova sulla carta 
è perduta: troppo tardi per operare al¬ 
tre modifiche. Con un vero word pro¬ 
cessor, invece, voi battete tutto quanto 
il testo (che rimane nella RAM del com¬ 
puter o, eventualmente, nella memoria 


di massa), lo correggete, apportate tut¬ 
te le modifiche “estetiche” che ritenete 
più opportune e poi lo stampate tutto 
in una volta. In ogni caso, prima della 
stampa potete effettuare tutte le modifi¬ 
che necessarie: un buon word processor 
permette di cambiare ogni linea di te¬ 
sto, cancellare paragrafi o spostarli al¬ 
trove e comunque manipolare il testo 
in molti altri modi. 

Anche se già possedete un word proces¬ 
sor commerciale per il vostro VIC 20, 
pensiamo sarete piacevolmente sorpre¬ 
si da SPEEDSCRIPT 3.0: esso infatti 
offre tutte le caratteristiche standard 
dei word processor commerciali, più al¬ 
tre inedite che potreste non aver mai 
visto prima. 
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Conte caricare o digitare 
SPEEDSCRIPT 3.0 

Il programma sembra molto lungo, ma 
in realtà occupa solo circa 6 Kbyte, me¬ 
no di molti giochi scritti in BASIC. Tutto 
quell’insieme di numeri è linguaggio 
macchina: solo con quest’ultimo si ottie¬ 
ne una simile compattezza, unita alla 
velocità e alla potenza. 

Se si dispone della cassetta allegata alla 
rivista, è sufficiente posizionarsi con il 
nastro in corrispondenza dell’inizio del 
programma e digitare: 

LOAD 

Il programma andrà quindi mandato in 
esecuzione, digitando: 

RUN 

Ricordiamo che per conoscere il punto 
esatto di inizio dei vari programmi su 
cassetta è sufficiente inserire quest’ulti- 
ma, completamente riavvolta nel regi¬ 
stratore, azzerare il contanastro e digi¬ 
tare: 

LOAD“*” 

Dal momento che sicuramente non esi¬ 
ste sulla cassetta alcun programma di 
nome il computer passerà in rasse¬ 
gna tutti i programmi, visualizzandone 
il nome con il messaggio: 

FOUND XXXX 

Sarà quindi utile annotarsi su un foglio 
i nomi dei programmi e la relativa posi¬ 
zione del contanastro (sottrarre tre o 
quattro unità dal valore corrispon¬ 
dente all’apparizione del messaggio 
FOUND...). 

Gli abbonati alla sola rivista dovranno 
invece usare il programma MLX (vede¬ 
re nelle pagine verdi) per digitare il lista¬ 
to in linguaggio macchina. La procedu¬ 
ra da seguire, in questo caso, è: 

1. Spegnere il computer ed inserire 
un’espansione di memoria da almeno 8 
Kbyte. 

2. Accendere il computer e digitare: 

POKE44,42:POKE10752,0:NEW [RE¬ 
TURN] 

Caricare in memoria MLX (che sarà sta¬ 
to precedentemente digitato e salvato) 
e rispondere alle sue richieste circa gli 
indirizzi iniziale e finale con: 

indirizzo iniziale: 4609 
indirizzo finale : 10482 

Dopo avere digitato e salvato il pro¬ 
gramma tramite MLX si potranno segui¬ 
re per il caricamento le istruzioni date 
più sopra per i possessori di cassetta. 

Primi passi 

Dopo avere battuto SPEEDSCRIPT 3.0 
tramite MLX potrete caricarlo in memo¬ 
ria da nastro o disco come un qualsiasi 


programma BASIC, e potrete anche ot¬ 
tenerne delle copie con un semplice co¬ 
mando SAVE. Date il RUN, lo schermo 
cambia colore, passando al grigio, e il 
cursore lampeggiante mostra dove ap¬ 
parirà il testo quando inizierete a batter¬ 
lo. Non potete scrivere sulle due linee 
più alte dello schermo: questa è la “fine¬ 
stra di comando", ed è usata da SPEE¬ 
DSCRIPT 3.0 per porre domande e vi¬ 
sualizzare messaggi. 

Quando viene visualizzato un messag¬ 
gio, questo rimarrà sullo schermo fino 
a che riprenderete a battere il testo. Per 
iniziare battete qualcosa. Se la parola 
che state battendo non sta interamente 
in una linea, la parola ed il cursore ver¬ 
ranno posti sulla linea successiva; que¬ 
sta tecnica, detta “parsing”, rende il vo¬ 
stro testo molto più leggibile sullo scher¬ 
mo, e le parole non sono mai spezzate 
sui margini. Un’altra cosa da notare è 
che appare una freccetta quando si pre¬ 
me RETURN: indica la fine di una linea 
o di un paragrafo. Non è necessario pre¬ 
mere RETURN alla fine di ogni linea di 
schermo, come dovreste invece fare al 
raggiungimento della fine di una linea 
su una macchina per scrivere. 

Nessuno di noi è infallibile, così potrete 
avere bisogno di correggere eventuali 
errori di battitura. E qui c’è il grande 
vantaggio di un word processor: correg¬ 
gere gli errori prima di passare alla 
stampa, senza bisogno di scolorine o 
speciali inchiostri correttori (avete mai 
provato a correggere gli errori su una 
macchina per scrivere? - ugh!). 

Se volete tornare indietro di uno spazio, 
premete INST/DEL senza lo SHIFT: il 
cursore torna indietro di uno spazio ca¬ 
rattere e cancella l’ultima lettera che 
avete battuto. Potete premerlo tante 
volte quante sono necessarie per can¬ 
cellare un carattere, una parola, una 
frase e poi ribattere il tutto nel modo 
corretto. 

Questo, chiaramente, non è il modo mi¬ 
gliore di procedere; potete invece spo¬ 
stare il cursore in modo non distruttivo, 
usando i tasti di cursore nell’angolo infe¬ 
riore destro della tastiera. Basta portar¬ 
si con il cursore sopra il carattere da 
sostituire e ribatterlo in modo corretto. 
Semplice, no? 

Ci sono anche altri comandi molto utili 
per portarsi in zone desiderate del te¬ 
sto: per esempio, se premete SHIFT 
insieme al tasto FI (cioè se premete 
F2), il cursore si porta all’inizio della 
parola precedente, mentre premendo 
FI si ottiene l’effetto opposto: il cursore 
si porta alla fine della successiva parola 
di testo. Ecco un elenco dei comandi 
disponibili con i tasti funzione: 

FI: muove il cursore alla parola succes¬ 
siva. 

F2: muove il cursore alla parola prece¬ 
dente. 

F3: muove il cursore all’inizio del perio¬ 
do successivo. 

F4: muove il cursore all’inizio del perio¬ 
do precedente. 


F5: muove il cursore all’inizio del pa¬ 
ragrafo successivo. 

F6: muove il cursore all’inizio del pa¬ 
ragrafo precedente. 

SPEEDSCRIPT 3.0 riconosce un perio¬ 
do dalla punteggiatura finale (un op¬ 
pure “?” oppure “!”) oppure da un ca¬ 
rattere di RETURN (la freccetta a sini¬ 
stra). Un paragrafo è qualsiasi sequenza 
di caratteri che finisce con un carattere 
di RETURN (un carattere di RETURN 
da solo, che può essere usato per crea¬ 
re linee vuote, conta anch’esso come 
un paragrafo). 

Dal momento che si sta lavorando con 
un testo, i tasti di cursore su/cursore 
giù non provocano un movimento verso 
l’alto o verso il basso di una linea di 
schermo (come in ambiente BASIC), ma 
agiscono come F3 ed F4. Il tasto di cur¬ 
sore giù ci fa muovere al periodo suc¬ 
cessivo, mentre quello di cursore su ci 
porta al periodo precedente. Come pro¬ 
verete a muovere il cursore attraverso 
il testo, noterete che non è possibile 
superare la fine del testo stesso: c’è un 
separatore invisibile, a volte chiamato 
EOF (End Of File), alla fine del docu¬ 
mento. Potete aggiungere testo alla fine 
del vostro documento, ma non potete 
muovervi al di là della fine di quest’ulti¬ 
mo, dal momento che oltre questo pun¬ 
to non c’è più nulla. In casi molto rari 
potrete vedere del testo dopo l’EOF, 
ma dal momento che non è raggiungibi¬ 
le, dovrà essere ignorato. Molti degli 
altri tasti hanno un comportamento pre¬ 
vedibile: CLR/HOME senza SHIFT 
muove il cursore nell’angolo superiore 
sinistro dello schermo; se premuto due 
volte, porta all’inizio del testo (nel caso 
ovviamente questo sia più lungo di una 
schermata). Il tasto INSERT (SHIFT+- 
INST/DEL) inserisce uno spazio nella 
posizione del cursore: potete premerlo 
il numero di volte necessario per creare 
spazio, in modo da inserire una parola. 
Potete anche portarvi in “modo insert”, 
dove ogni parola o carattere che batte¬ 
te viene automaticamente inserito nel 
testo: entrate ed uscite dal modo insert 
con la pressione di CONTROL+I. 
Quando si preme un tasto, normalmen¬ 
te appare il corrispondente carattere o 
simbolo. Certi tasti, come CLR/HOME, 
eseguono invece una funzione. SPEED¬ 
SCRIPT 3.0 estende questo concetto e 
ordina tutti i tasti di comando in una 
sequenza facile da ricordare. Per esem¬ 
pio, il modo insert viene attivato e disat¬ 
tivato premendo CONTROL+I (per 
usare uno di questi tasti premete CON¬ 
TROL contemporaneamente al tasto 
corrispondente). 

Quando entrate in modo insert la fine¬ 
stra di comando cambia di colore per 
ricordarvelo. Se premete di nuovo 
CONTROL+I, ritornate in modo nor¬ 
male e potete sostituire dei caratteri, 
portandovi sopra di essi con il cursore 
e quindi battendo i caratteri corretti. La 
finestra di comando ritornerà del solito 
colore. 
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CONTROL+Z vi porta alla fine del vo¬ 
stro documento (End Of File). È utile 
per aggiungere del testo alla fine dello 
scritto. Se volete sapere quanta memo¬ 
ria libera vi rimane per il testo, premete 
CONTROL+= (tasto di “uguale”). Di¬ 
sponete di circa 4 Kbyte nel VIC 20 con 
espansione da 8Kbyte. 

Per adattare secondo i vostri gusti i co¬ 
lori dello schermo e del testo, CON- 
TROL+B (B per Background) cambia il 
colore dello schermo, mentre CON- 
TROL+L (L per Letter) cambia il colore 
del testo. Premeteli più volte, fino a che 
trovate una combinazione di colori che 
vi soddisfa. 

Si noti che dopo aver modificato questi 
colori, se si preme RUN/STOP+ RE- 
STORE per uscire da SPEEDSCRIPT 
3.0 e ritornare in ambiente BASIC, e 
quindi si opera un normale SAVE su 
nastro o disco, il programma verrà sal¬ 
vato con questi colori. 

Il tasto RUN/STOP funziona un po’ co¬ 
me un tasto TAB: inserisce cinque spazi 
alla posizione del cursore. Potete usarlo 
per indentazioni, o per aggiungere in¬ 
dentazioni ad un paragrafo battuto pre¬ 
cedentemente. 

Se volete passare dal maiuscolo al mi¬ 
nuscolo e viceversa, posizionate il cur¬ 
sore sulla lettera desiderata e premete 
CONTROL+A; la lettera desiderata 
passerà dal maiuscolo al minuscolo o 
viceversa. La pressione di CONTROL+ 
A muove il cursore a destra di una posi¬ 
zione, così potete premerlo più volte 
per far passare dal minuscolo al maiu¬ 
scolo intere parole. 

Un altro utile comando è CON- 
TROL+X, per la trasposizione: l’errore 
più comune, battendo velocemente, è 
invertire due lettere di una parola. Con 
CONTROL+X è facilissimo riportare le 
cose per il giusto verso, scambiando di 
posto i due caratteri sbagliati. 

Cancellazione del testo 

Con l’uso del tasto DEL, come si è visto, 
si possono cancellare gli ultimi caratteri 
battuti. In realtà, la funzione di questo 
tasto è ancora più potente. Supponia¬ 
mo che abbiate scritto tutto il vostro 
documento e vi accingiate a rileggerlo, 
per correggere eventuali errori di batti¬ 
tura; scoprite nel bel mezzo del testo la 
parola “sopprrattutto”. Ora, come can¬ 
cellare la “p” e la “r” di troppo senza 
lasciare un antiestetico “buco” di spazi 
nel testo? Basta posizionarsi con il cur¬ 
sore sulla seconda “r” della parola e 
premere due volte il tasto DEL: meravi¬ 
glia delle meraviglie, tutto quanto il te¬ 
sto seguente scorrerà all’indietro di due 
spazi, ottenendo il duplice scopo di cor¬ 
reggere l’errore e chiudere i vuoti occu¬ 
pati dai caratteri eliminati! 

Se invece non voleste ottenere lo scorri¬ 
mento all’indietro del testo, basterà 
premere, invece del tasto DEL, la frec¬ 
cetta a sinistra: vi muoverete semplice- 
mente con il cursore indietro di uno spa¬ 
zio, cancellando il carattere che lì si tro¬ 
vava. Un altro sistema per cancellare 


del testo è usare i tasti CONTROL+- 
freccetta a sinistra: il cursore non si spo¬ 
sta, ma tutto il testo seguente viene 
“aspirato” dal cursore stesso; una spe¬ 
cie di mini buco nero... 

Se invece desiderate cancellare un inte¬ 
ro periodo, paragrafo o comunque una 
notevole mole di testo, ci sono dei co¬ 
mandi molto più drastici dei precedenti: 
uno di questi è CONTROL+E (E per 
Erase). Premendo CONTROL+E la fi¬ 
nestra di comando passa al rosso e ve¬ 
drete il messaggio: 

Erase (S,W,P): 

RETURN to exit 

Da questo momento ogni volta che ven¬ 
gono premuti i tasti S, W o P (S per 
Sentence, W per Word, P per Pa- 
ragraph), rispettivamente una frase, 
una parola o un paragrafo vengono 
“aspirati” dal cursore. Potete premere 
questi tasti fino a che tutto il testo che 
volete rimuovere sia stato “aspirato”, 
quindi premete RETURN per uscire dal 
“modo erase” e riprendere a scrivere. 
Questo sistema cancella il testo a destra 
del cursore; se vi trovate alla fine di un 
periodo, di una parola o di un paragra¬ 
fo, potete invece usare la funzione di 
“delete”: CONTROL+D (D per Delete) 
per cancellare il testo a sinistra del cur¬ 
sore. Alla pressione di CONTROL+D 
verrà visualizzato il messaggio: 

Delete (S,W,P) 

Si ritornerà automaticamente in modo 
scrittura dopo che il testo è stato can¬ 
cellato, usando S, W o P. 

In generale, si può uscire da qualsiasi 
comando di SPEEDSCRIPT 3.0 sempli¬ 
cemente premendo RETURN. 

E se vi capita di cancellare inavvertita¬ 
mente un paragrafo? Oppure se subito 
dopo aver cancellato cambiate idea e 
vi accorgete che quel testo andava be¬ 
nissimo? Oh, no! Con gran parte dei 
word processor non avreste che da 
piangere sul latte versato. Non però con 
SPEEDSCRIPT 3.0! Con alcune limita¬ 
zioni, ovviamente, SPEEDSCRIPT 3.0 
immagazzina e “si ricorda” del testo che 
avete cancellato con CONTROL+E op¬ 
pure con CONTROL+D. Quindi, se 
cambiate idea o se vi accorgete del fata¬ 
le errore, premete CONTROL+R (R 
per Recali). 

Ecco come funziona: quando cancellate 
del testo, questo viene spostato dallo 
schermo in un buffer apposito (cioè in 
una particolare area di memoria riser¬ 
vata a questo scopo). SPEEDSCRIPT 
3.0 riserva 1 Kbyte di RAM per questo 
buffer. 

E inoltre possibile un altro uso del buf¬ 
fer: si può mettervi deliberatamente del 
testo per richiamarlo poi nella voluta 
destinazione. Cancellate semplicemen¬ 
te con CONTROL+E oppure con CON¬ 
TROL+D il testo che volete “spostare”, 
muovetevi con il cursore nella posizione 
in cui lo volete far ricomparire, e preme¬ 


te CONTROL+R. Eccolo lì! È questo 
un sistema veramente utilissimo per 
spostare in quattro e quattr’otto intere 
parti di testo dall’inizio alla fine del do¬ 
cumento, e viceversa. Oppure per du¬ 
plicarne parti quante volte si vuole: in¬ 
fatti si può accedere al buffer infinite 
volte per inserire lo stesso testo (quello 
appunto contenuto nel buffer) in più 
parti del documento; pensate quante 
volte ricorrono in certi documenti le 
stesse parole, o addirittura le stesse fra¬ 
si: vi basterà immagazzinarle una volta 
per tutte nel buffer con CONTROL+D 
o CONTROL+E, e poi potrete recupe¬ 
rarle “ad libitum”, usando CON¬ 
TROL+R. 

Attenzione, però: ogni volta che usate 
CONTROL+D, oppure CONTROL+E, 
tutto il contenuto precedente del buffer 
viene cancellato. 

E tuttavia possibile caricare il buffer con 
due paragrafi diversi, evitando la sua 
cancellazione con il secondo CON¬ 
TROL+D (o CONTROL+E): dopo aver 
caricato normalmente il primo paragra¬ 
fo nel buffer, con CONTROL+D (o 
CONTROL+E), verrà caricato in coda 
anche il secondo, se premete SHIFT- 
+CONTROL+E. Nel caso non ci sia più 
spazio sufficiente nel buffer apparirà il 
messaggio: 

Buffer Full 

È anche possibile pulire tutto il buffer 
premendo CONTROL+K (K per Kill). 
infine, se volete cancellare tutto quanto 
il vostro testo (ma attenzione: non po¬ 
trete più rcuperarlo!), premete SHIFT+ 
CLR/HOME; apparirà il seguente mes¬ 
saggio: 

ERASE ALL TEXT: Are 
you sure? (Y/N): 

Se veramente volete cancellare il testo, 
battete “Y” (Y per Yes); la pressione di 
qualsiasi altro tasto, compresa la “n”, 
verrà interpretato come un “no” ed il 
testo non sarà cancellato. 

Opzione di ricerca 

Quando vi trovate nel bel mezzo di un 
lunghissimo documento e desiderate 
trovare una particolare parola o frase, 
è molto utile usare il comando di ricer¬ 
ca. 

SH1FT+ CONTROL+H attiva la ricer¬ 
ca (H per Hunt), SHIFT+CONTROL+J 
permette di cercare e sostituire seletti¬ 
vamente parti di testo, mentre CON- 
TROL+G cerca e sostituisce automati¬ 
camente. 

Premete SHIFT+CONTROL+H, ed 
apparirà il messaggio: 

Hunt for: 

Digitate la parola o la frase che volete 
ricercare e premete RETURN. Quando 
siete pronti per effettuare la ricerca 
premete CONTROL+H, e SPEED¬ 
SCRIPT 3.0, partendo dalla posizione 
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corrente del cursore, troverà la parola 
che avete battuto e vi porterà sopra il 
cursore stesso, con uno scroll del testo, 
se necessario. Se la frase o la parola 
che avete battuto non esiste nel testo, 
vedrete nella finestra di comando il 
messaggio: 

Not Found 

Se premete due volte CLR/HOME, 
SPEEDSCRIPT 3.0 cercherà la parola 
o frase dall’inizio del testo; una volta 
trovata, se premete ancora CON- 
TROL+H, SPEEDSCRIPT 3.0 proce¬ 
derà nella ricerca fino a che o la trova 
una seconda volta nel testo seguente, o 
viene raggiunta la fine del documento. 
Questa procedura può essere ripetuta 
più volte, fino a che si giunge alla fine 
del documento. Se desiderate cambiare 
la frase o parola da ricercare, premete 
ancora SHIFT+CONTROL+H. 
Attenzione ad alcune particolarità di 
questa funzione: se ad esempio deside¬ 
rate cercare la parola “se”, SPEED¬ 
SCRIPT 3.0 si fermerà ogni volta che 
verranno trovati nel testo questi due ca¬ 
ratteri, ed il cursore si fermerà su paro¬ 
le come “albanese”, “semantica”, “se¬ 
dia”, ecc. Naturalmente, non è ciò che 
desiderate ottenere, quindi, per fare in 
modo che SPEEDSCRIPT 3.0 si fermi 
solo sulla congiunzione “se”, alla richie¬ 
sta della parola da ricercare battete “ 
se ” (preceduto e seguito da uno spazio) 
e premete RETURN. 

CÒNTROL+J lavora insieme a CON- 
TROL+H: dopo aver specificato la fra¬ 
se o parola da ricercare con SHIFT- 
+CONTROL+H, premete CONTROL+ 
J per visualizzare il messaggio: 

Replace with: 

Digitate la parola o frase che volete so¬ 
stituire alla precedente: se premete RE¬ 
TURN sostituirete la parola con una 
stringa nulla, provocandone la cancella¬ 
zione. 

Per cercare e sostituire “manualmente” 
iniziate con il premere CONTROL+ H; 
quando SPEEDSCRIPT 3.0 si ferma 
con il cursore sulla parola trovata pre¬ 
mete CONTROL+J, se desiderate so¬ 
stituirla, altrimenti premete nuovamen¬ 
te CONTROL+ H per proseguire nella 
ricerca, oppure continuate semplice- 
mente a scrivere il vostro documento. 
CONTROL+G unisce i comandi CON- 
TROL+H e CONTROL+J: verrà visua¬ 
lizzato il messaggio: 

Hunt for: 

Digitate la parola o frase da sostituire 
e premete RETURN. Verrà quindi vi¬ 
sualizzato il messaggio: 

Replace with: 

Digite la parola o frase che volete sosti¬ 
tuisca la precedente e premete RE¬ 
TURN. A questo punto SPEEDSCRIPT 


3.0 cercherà e sostituirà automatica- 
mente la prima parola o frase, ogni vol¬ 
ta che ricorre, con la seconda. 

Questa funzione è estremamente como¬ 
da per scrivere, ad esempio, circolari 
personalizzate: su uno stesso testo pote¬ 
te in un attimo sostituire “Rossi Mario" 
con “Bianchi Ernesto”, anche in docu¬ 
menti molto lunghi. 

Caricamento e salvataggio del 
testo 

Ciò che rende veramente grande un 
word processor è la possibilità di salva¬ 
re i propri scritti su nastro o su disco, 
richiamarli quando servono e produrne 
quante copie si vuole: integrali, parziali, 
originali o comunque modificate. Non 
più montagne di fogli di carta che si 
deteriorano o pagine che perdono il 
proprio naturale ordinamento: in un 
floppy da 5 pollici ci sta quasi un intero 
libro, ed una buona C90 saprà contene¬ 
re e conservare buona parte dei vostri 
scritti. 

Per salvare il testo premete F8 (cioè 
SHIFT+F7). Apparirà il messaggio: 

Save: 

Battete il nome che volete assegnare al 
documento, seguendo le regole stan¬ 
dard della Commodore per i nomi di file 
(max. lunghezza 16 caratteri), premete 
RETURN ed alla domanda: 

Tape or Disk? 

rispondete premendo rispettivamente 
la “T” per il registratore a cassette e la 
“D” per il disk drive. Alla fine del SAVE 
comparirà il messaggio: 

No Errors 

Se invece si è verificato qualche errore 
nel SAVE, come nessun disco nel dri- 
vre, o disco pieno, ecc., SPEEDSCRIPT 
3.0 leggerà il canale degli errori del dri¬ 
ve, segnalandovene il tipo. Naturalmen¬ 
te, ciò non vale per il registratore a cas¬ 
sette, il quale non dispone di un sistema 
di verifica degli errori. 

Otterrete il messaggio: 

File Exists 

se cercate di salvare un documento con 
un nome già presente nella directory 
del disco. Se volete sostituire il file già 
precedentemente registrato con lo stes¬ 
so nome, usate al solito la chiocciolina 
come prefisso al nome del file. Ad 
esempio: 

@ : lettera 

Potete anche premere CONTROL+- 
freccia all’insù (spiegato più avanti) e 
cancellare il file prima del salvataggio. 
Premete invece F7 per caricare un file. 
Il comando LOAD è in pratica un MER- 
GE, in quanto carica il file a partire dal¬ 
la posizione nella quale si trova il curso¬ 


re, senza cancellare il testo che si trova 
precedentemente a questo. 

Quindi, se non vi serve più il testo che 
avete in memoria e volete caricarne un 
altro, premete innanzi tutto SHIFT + 
CLR/HOME per cancellare la memo¬ 
ria, poi procedete al LOAD. Se invece 
volete fondere il testo presente in me¬ 
moria con quello registrato su disco o 
nastro, posizionatevi con il cursore nella 
posizione dalla quale volete far partire 
il proseguimento del testo e fate il 
LOAD. In questo caso la finestra di co¬ 
mando cambierà di colore, per avvisar¬ 
vi che state operando un MERGE con 
il testo in memoria. 

Particolare attenzione va posta in que¬ 
ste procedure, in quanto è possibile 
mandare in “crash" SPEEDSCRIPT 
3.0, se si cerca di caricare un file più 
lungo della memoria disponibile per 
contenerlo. 

Si può usare CONTROL+V (V per Ve- 
rify)„per verificare un file appena salva¬ 
to. E sempre opportuno verificare i sal¬ 
vataggi su nastro, mentre lo è meno su 
disco, per la sua maggiore affidabilità. 
I file generati da SPEEDSCRIPT 3.0 
appaiono nella directory come PRG, file 
programma. I testi certamente non so¬ 
no programmi, ma dal momento che il 
sistema operativo possiede delle appo¬ 
site routine di LOAD e SAVE, i file te¬ 
sto sono in realtà dei “dump di memo¬ 
ria”. 

Ciò rende possibile caricare dei file 
creati da altri word processor, come 
WordPro o PaperClip, con un minimo 
lavoro di riformattazione. Dal momento 
che alcuni lettori, con la versione prece¬ 
dente di SPEEDSCRIPT, cercavano di 
caricare in memoria i testi direttamente 
da BASIC digitando LOAD “nome del 
file”, teniamo a sottolineare, anche se 
sembrerebbe superfluo, che i testi pos¬ 
sono essere caricati solo tramite 
SPEEDSCRIPT 3.0 stesso, e non in mo¬ 
do diretto come qualsiasi programma. 

Altri comandi per i dischi 

Usate CONTROL+4 (“4” è il tasto su 
cui si trova il “$”, di facile memoria) per 
caricare la directory del disco. Natural¬ 
mente, questa operazione non cancella 
il testo che si trova in memoria. Mentre 
la directory viene listata sul video, se 
tenete premuto il tasto CONTROL, ot¬ 
terrete come di norma un rallentamento 
del listing, e se premete la barra spazia¬ 
trice, questo si fermerà, per riprendere 
a una successiva pressione della barra. 
Potete inviare uno qualsiasi dei coman¬ 
di ammessi dal DOS con la pressione 
di CONTROL+freccia all’insù. La fine¬ 
stra di comando mostrerà il simbolo 
“.mag> battete il comando desidera¬ 
to nella solita forma, seguito dal RE¬ 
TURN. Per ottenere un elenco dei co¬ 
mandi del DOS fate riferimento al ma¬ 
nuale del vostro drive o alla serie di 
articoli “Iniziare con un sistema a di¬ 
schi” pubblicata sui numeri di SUPER- 
VIC dello scorso anno. Se premete RE¬ 
TURN senza digitare un comando. 
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SPEEDSCRIPT 3.0 visualizza l’even¬ 
tuale messaggio d’errore del drive. 

Si vede quindi come il comando CON- 
TROL+freccia all’insù sia più che simile 
al DOS wedge. 

Fase di stampa 

Alla fine abbiamo raggiunto il punto 
chiave di un word processor: la stampa. 
Non è però detto che per usare SPEED¬ 
SCRIPT 3.0 dobbiate necessariamente 
possedere una stampante: se avete de¬ 
gli amici che posseggono anch’essi 
SPEEDSCRIPT 3.0, potete scambiarvi 
lettere o comunque testi su disco o na¬ 
stro che possono essere tranquillamen¬ 
te letti sul video. Oppure, se avete un 
amico con una stampante, non ve ne 
rifiuterà certamente l’uso per i pochi 
minuti necessari a stampare un testo 
anche lungo, una volta che vi presentia¬ 
te a lui con il disco o la cassetta conte¬ 
nente sia SPEEDSCRIPT 3.0 che il vo¬ 
stro testo.... 

Prima che il testo possa venire stampa¬ 
to deve essere formattato. Formattare 
un testo significa scegliere i margini di 
stampa (cioè da quanti caratteri deve 
essere composta una riga), la lunghezza 
delle pagine (non vorrete per caso stam¬ 
pare sulla perforazione tra i fogli a mo¬ 
dulo continuo, no?), prevedere even¬ 
tualmente dei numeri di pagina, intesta¬ 
zioni alle pagine e così via... 
SPEEDSCRIPT 3.0 fa tutto ciò, ed an¬ 
che di più, ma con tutte queste possibili¬ 
tà si crea per forza l’esigenza di impara¬ 
re dei nuovi comandi. Anche se può 
sembrare difficile poter tenere a mente 
tutte le funzioni dei vari tasti, vi garan¬ 
tiamo, per nostra esperienza che dopo 
un po’ di prove e di allenamento ve li 
ricorderete tutti senza sforzo alcuno. 
Anche a questo proposito, in base al¬ 
l’esperienza fatta con alcuni lettori circa 
la precedente versione di SPEED¬ 
SCRIPT, teniamo a sottolineare che i 
caratteri di controllo per margini, spa¬ 
ziatura, ecc. vanno ovviamente inseriti 
PRIMA del testo che si desidera format¬ 
tare, e NON in fondo al documento, 
altrimenti non avranno effetto alcuno 
sulla stampa. 

I comandi dei quali ci accingiamo a par¬ 
lare non agiscono sul testo, ma solo sul 
modo con il quale il testo verrà stampa¬ 
to. Alcuni, per fare un esempio, pensa¬ 
no a modificare il margine sinistro, altri 
provvedono a centrare sul foglio di car¬ 
ta i titoli, o a fare sottolineature e così 
via. Ricordatevi comunque che i coman¬ 
di di formato non cambiano il testo così 
come appare sul video, ma solo come 
apparirà sulla carta. 

Grazie a molti parametri di default (cioè 
scelti automaticamente dal computer se 
non settati diversamente), potete stam¬ 
pare direttamente senza usare alcun co¬ 
mando di formato. Se premete CON- 
TROL+P, SPEEDSCRIPT 3.0 opererà 
l’assunzione dei parametri di default e 
comincerà a stampare. Alcuni di questi 
parametri di default sono: margine sini¬ 
stro di cinque spazi, margine destro a 


75 (ciò significa che ogni riga sarà lunga 
70 caratteri) e singola spaziatura (era 
doppia nella versione precedente di 
SPEEDSCRIPT). Se desiderate cambia¬ 
re questi parametri, dovete imparare i 
comandi di formato della stampa. 
CONTROL+P stampa subito su una 
stampante Commodore 1525, MPS 
801, o 1526, con numero di periferica 
4 ed indirizzo secondario 7 (maiuscolo 
e minuscolo). Se CONTROL+P non 
funziona con la vostra stampante, pro¬ 
vate a premere SH1FT+CONTROL+P; 
verrà visualizzato il messaggio: 

Print to: Screen, Disk, Printer? 

Premete S, D, o P. Se premete P per 
la stampante, vi verrà chiesto: 

Device number? 

Rispondete con l’opportuno numero di 
periferica, da 4 a 7. Verrà quindi visua¬ 
lizzato il messaggio: 

Secondary address? 

Rispondete con l’indirizzo secondario 
opportuno, da 0 a 9. Per conoscere il 
numero di periferica e l’indirizzo secon¬ 
dario adatti alla vostra stampante fate 
riferimento al manuale della stessa, in 
quanto possono variare caso per caso. 
Se rispondete S per la stampa sullo 
schermo, i colori del video cambiano in 
sfondo nero con caratteri bianchi, e ciò 
che appare sullo schermo è esattamen¬ 
te ciò che apparirà sulla carta una volta 
stampato il documento. 

Un’unica limitazione: lo schermo è com¬ 
posto da 40 colonne, quindi le linee di 
testo in una stampa a 80 caratteri per 
linea occuperanno - ovviamente - due 
linee di schermo. Se avete settato i mar¬ 
gini per una stampa a quaranta colon¬ 
ne, il video mostrerà esattamente 
l’aspetto della stampa su carta. Per fer¬ 
mare la visualizzazione premete SHIFT 
o SHIFT LOCK. Alla fine della visualiz¬ 
zazione premete qualsiasi tasto per ri¬ 
tornare all’editing. 

Se rispondete infine con D, otterrete la 
stampa su disco di un file sequenziale 
contenente testo e caratteri di control¬ 
lo, dopo averne digitato il nome in rispo¬ 
sta a una domanda del computer. Que¬ 
sto file può essere usato per il carica¬ 
mento da altri word processor tipo Easy 
Script, o processato da appositi pro¬ 
grammi. 

I comandi di formato 

I comandi di formato sono singole lette¬ 
re o caratteri che appaiono sullo sche¬ 
rno in formato “reverse”. Per ottenere 
una lettera in reverse premete CON- 
TROL+simbolo della lira (quella a fian¬ 
co del tasto CLR/HOME). La finestra 
di comando visualizzerà la domanda: 

Key: 

Ora premete uno dei caratteri di forma¬ 


to, come “r” (r per right) per il margine 
destro, “c” (c per center) per il centrag¬ 
gio automatico di un titolo, ecc. Quel 
carattere apparirà in reverse. SPEED¬ 
SCRIPT 3.0 riconosce come caratteri 
di formato solo lettere minuscole e qual¬ 
che simbolo grafico. I caratteri di forma¬ 
to sono riportati in tabella. 

In questa versione di SPEEDSCRIPT 
esistono due tipi di caratteri di controllo 
o formato, che possiamo chiamare di 
Livello 1 e di Livello 2. I comandi di 
livello 1 controllano variabili come i 
margini sinistro e destro: molti di essi 
sono seguiti da un numero, senza spazi 
tra il comando ed il numero. I comandi 
di livello 1 sono eseguiti prima che una 
linea venga stampata. 

I comandi di livello 2, come centratura 
e sottolineatura, vengono eseguiti du¬ 
rante la stampa di una linea. Solitamen¬ 
te i comandi di livello 1 devono occupa¬ 
re una linea essi stessi, mentre quelli di 
livello 2 sono per loro natura mischiati 
al testo da stampare. 

Comandi di livello 1 

I comandi di livello 1 rappresentano le 
variabili di stampa: sono valori come 
margine sinistro, margine destro, spa¬ 
ziatura, margini superiore ed inferiore, 
ecc. Sono chiamati variabili, in quanto 
possono cambiare. Infatti, può darsi che 
per dare maggiore risalto a un partico¬ 
lare paragrafo del vostro scritto voglia¬ 
te indentarlo, aumentando il margine si¬ 
nistro, ed anche cambiare la spaziatura 
tra le linee per renderlo più compatto. 
Poi, naturalmente, vorrete riprendere a 
stampare il resto del testo con il margi¬ 
ne sinistro e la spaziatura normali; ecco 
un esempio di quando occorre modifica¬ 
re le variabili della stampante. 

Per cambiare una variabile fate seguire 
il carattere in reverse da un numero, 
senza lasciare spazi in mezzo. Potete 
mettere i comandi di livello 1 in qualsia¬ 
si parte del testo, purché occupino da 
soli una o più linee. 

I comandi di livello 1 sono: 

I margine sinistro (1 per left), default 
5. Il margine sinistro è il numero di spazi 
di indentazione di ciascuna riga. Può 
assumere valori da 0 a 255. 


r margine destro (r per right), default 
75. Può assumere valori da 0 a 255, e 
deve essere un numero maggiore del 
valore dato al margine sinistro. Aggiun¬ 
gete al margine sinistro la lunghezza de¬ 
siderata di caratteri per una riga, ed 
otterrete il margine destro. 


* margine superiore (t per top), de¬ 
fault 5. E il numero di linee dal bordo 
della carta dopo le quali inizia la stam¬ 
pa. L’eventuale header è sempre stam¬ 
pato sulla prima linea di ogni pagina, 
precedentemente alla prima linea di te¬ 
sto. 
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b margine inferiore (b per bottom), 
default 58. La carta standard america¬ 
na a otto pollici e mezzo per undici pos¬ 
siede 66 linee. L’eventuale footer è 
sempre stampato sull’ultima linea della 
pagina, dopo l’ultima linea di testo. 


p lunghezza pagina, default 66. Se la 
vostra stampante non stampa sei linee 
per pollice, moltiplicate il numero di li¬ 
nee per pollice per 11 per ottenere la 
lunghezza della pagina. Per la carta eu¬ 
ropea, a seconda dei formati usati, po¬ 
tete provare 69 o 72. 


s spaziatura, default 1. Può assume¬ 
re valori da 1 a 255. 


@ numero di pagina a partire da un 
certo numero. La numerazione delle pa¬ 
gine inizia normalmente da 1. 


? disabilita la stampa fino a che viene 
raggiunto un certo numero di pagina. 
Per esempio, un valore di 3 farà iniziare 
la stampa dalla terza pagina del vostro 
documento. Normalmente SPEED- 
SCRIPT 3.0 inizia a stampare dalla pri¬ 
ma pagina. 


x larghezza della pagina, in colonne, 
default 80. Serve per uso congiunto alla 
centratura, se si stampa in doppia lar¬ 
ghezza o con caratteri condensati, o se 
si usa una stampante a 40 colonne. 


n salto pagina forzato. Non richiede 
numeri. Quando viene incontrato que¬ 
sto comando, SPEEDSCRIPT 3.0 stam¬ 
pa automaticamente il testo seguente 
su una nuova pagina. 


m indentazione esterna. Disabilita il 
margine sinistro per la successiva linea 
stampata. Si ricordi che il comando va 
inserito prima della linea da indentare 
esternamente. 


a vero ASCII. Per stampa su stam¬ 
panti non Commodore che utilizzano la 
codifica dei caratteri standard ASCII. 
Va posto all’inizio del testo come primo 
comando e non va seguito da numeri. 


w attende a fine pagina (w per wait). 
Deve essere posto all’inizio del testo, 
ed è utilizzato per stampa su fogli singo¬ 
li. Alla fine della stampa di ogni pagina 
SPEEDSCRIPT 3.0 aspetterà a proce¬ 
dere fino a che si preme RETURN. 
Questo comando viene ignorato 
nell’output su schermo o su disco. 


j linefeed automatico. Deve essere 
posto all’inizio del testo, e funziona in 
congiunzione all’opportuno posiziona¬ 
mento degli switch della stampante. 
Usatelo solo se vedete che il testo viene 
stampato tutto su una stessa linea senza 
mai andare a capo. 


i informazioni. Funziona come la 
REM in BASIC. Fate seguire il comando 
da un testo lungo fino a 255 caratteri, 
terminante con un carattere di RE¬ 
TURN, e il tutto verrà ignorato in fase 
di stampa. 


h header. L’header è stampato in ci¬ 
ma ad ogni pagina, se ne avete definito 
uno. Per definire un header iniziate la 
linea con h, battete il testo dell’header 
fino a 254 caratteri e premete RE¬ 
TURN. L’header verrà stampato su 
ogni pagina. Potete mettere una c (vedi 
più avanti) dopo la h per centrarlo, op¬ 
pure un # (vedi più avanti) in qualun¬ 
que posto vogliate far apparire il nume¬ 
ro di pagina. 


f footer. Il footer è esattamente come 


l’header, solo che si trova a piè di pagi¬ 
na invece che in alto. 


g GOTO (link) il prossimo file. Pone¬ 
te questo comando come ultima linea 
del documento, e fatelo seguire dalla 
lettera D per il disco, o T per il nastro, 
quindi i due punti ed infine il nome 
del file da caricare in memoria e stam¬ 
pare di seguito al primo. Con questo 
sistema è possibile stampare dei docu¬ 
menti di lunghezza infinita, che mai po¬ 
trebbero essere contenuti nella memo¬ 
ria del computer. 

Comandi di livello 2 

Questi comandi non cambiano le varia¬ 
bili di stampa, ed in genere sono conte¬ 
nuti in mezzo al testo. 


u sottolineatura (u per underline). 
Deve trovarsi all’inizio ed alla fine della 
parola o frase da sottolineare. Questo 
comando non ha effetto sulle stampanti 
Commodore, ma su tutte quelle stam¬ 
panti che riconoscono un CHR$(8) co¬ 
me backspace ed un CHR$(95) come 
carattere di sottolineatura. 


TABELLA 1 - Comandi di editing 

CTRL+A 

Passa da minuscolo a maiuscolo e viceversa. 

CTRL+B 

Cambia il colore dello schermo. 

CTRL+D 

Delete. 

CTRL+E 

Erase. 

CTRL+G 

Cerca e sostituisci automatico. 

CTRL+H 

Ricerca. 

CTRL+1 

Insert. 

CTRL+J 

Sostituisci. Con SHIFT seleziona la frase o 


parola da sostituire. 

CTRL+K 

Cancella il buffer. 

CTRL+L 

Cambia il colore del testo. 

CTRL+P 

Stampa. 

CTRL+R 

Richiama il testo dal buffer 

CTRL+V 

Verifica un file. 

CTRL+X 

Inverte due caratteri. 

CTRL+= 

Memoria libera. 

CTRL+Z 

Fine del testo. 

CTRL+4 

Carica la directory del disco. 

CTRL+f 

Manda comandi al DOS. 

CTRL+lira 

Inserisce un carattere di controllo. 

FUNCTION1 

Parola seguente. 

FUNCTION2 

Parola precedente. 

FUNCTION3 

Periodo seguente. 

FUNCTION4 

Periodo precedente. 

FUNCTION5 

Paragrafo seguente. 

FUNCTION6 

Paragrafo precedente. 

FUNCT10N7 

Load. 

FUNCTION8 

Save. 

CRSR-SU 

Periodo precedente. 

CRSR-GIÙ 

Periodo seguente. 

CRSR-DES-S1N Come implicito. 

CLR/HOME 

Cancella tutto. 

<— 

Backspace. 

CTRL-m— 

Cancella un carattere. 

RUN/STOP 

Inserisce cinque spazi. Con SHIFT inserisce 255 spazi. 
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TABELLA 2 — Comandi di formato 


CMD 

DESCRIZIONE 

DEFAULT 

1 

margine sinistro 

5 

r 

margine destro 

75 

t 

margine superiore 

5 

b 

margine inferiore 

58 

h 

header 

. 

f 

footer 

. 

w 

aspetta cambio foglio 

. 

a 

vero ASCII 

. 

u 

sottolineatura 

. 

c 

centraggio 

- 

e 

angolo destro 

- 

# 

numero di pagina 

- 

9 

carica file in link 

. 

i 

informazioni 

. 

j 

linefeed automatico 

. 

ai 

indentazione esterna 

- 

n 

pagina successiva 

- 

P 

lunghezza pagina 

66 

a 

spaziatura 

1 

X 

colonne pagina 

80 

@ 

numero pagina iniziale 

1 

? 

salta stampa pagine 

- 


c centraggio. Va messo all’inizio del 
testo da centrare sul foglio di carta. 
Ricordate di far terminare il testo da 
centrare con un RETURN. Il centraggio 
viene calcolato sulla larghezza di pagina 
definita eventualmente dal comando x. 


# numero di pagina. Quando 
SPEEDSCRIPT 3.0 incontra questo 
simbolo stampa il numero della pagina 
corrente. 

Codici definibili daH’utente 

Molte stampanti usano speciali sequen¬ 
ze di codici per controllare funzioni di 
stampa come sottolineatura, caratteri 
elongati, in grassetto, ecc. Questi codici 
sono dei numeri ASCII minori di 32 (co¬ 
dici di controllo), oppure sono rappre¬ 
sentati dal carattere “ESC”, CHR$(27), 
seguito da una lettera o un simbolo. Ad 
esempio, nella Epson MX-80 con Graf- 
trax, i caratteri “italici" sono attivati con 
ESC 4. Occorre consultare il manuale 
della stampante per imparare ad usare 
questi codici. Dal momento che molti 
dei codici di controllo e il carattere ESC 
non sono ricavabili direttamente da ta¬ 
stiera, SPEEDSCRIPT 3.0 vi permette 
di definire i comandi di formato 1-9. 
Anche questi comandi vanno inseriti 
usando CONTROL+simbolo della lira. 
Se battete 1=65, ogni volta che il carat¬ 
tere in reverse 1 viene incontrato du¬ 


rante la fase di stampa, quel carattere 
(65 è la lettera “A” in ASCII) viene in¬ 
viato alla stampante. Ad esempio, 
SPEEDSCRIPT 3.0 usa la freccia a sini¬ 
stra come indicatore del RETURN, co¬ 
sicché non potete direttamente stampa¬ 


re la freccia a sinistra su carta. Dal mo¬ 
mento che il suo codice ASCII è il 95, 
se ponete 1=95 all’inizio del testo, ogni 
volta che SPEEDSCRIPT 3.0 incontre¬ 
rà 1, verrà stampata la freccia a sini¬ 
stra. 


Speedscript 3.0 per Vie 20 


4609 : 01 1 ,01 8,01 0 , 000,1 58 , 052,2 50 
461 5 : 054 , 050 , 049 , 000 , 000 , 000,1 60 
4621 : 032,1 31 ,01 9,1 69 , 203 , 205,004 
4627 -. 109 , 044,141 , 109,04 4 , 240,1 94 
4633 : 003 , 032 , 050 , 019 , 032 , 195,100 
4639 :01 9 , 076 , 038 , 020,1 65 , 038,1 31 
4645 : 1 41 , 067,01 8 , 165 , 039,1 41 ,0 96 
4651 : 068,01 8,1 65,1 58,1 41 , 070,1 51 

4657 : 01 8 , 165 , 159 , 141 , 071 , 018,109 
4663 : 166 , 181 , 240 , 032 , 169 , 000,075 
466 9 : 1 41 , 000,041 ,1 60 , 000,1 85,0 76 
4675 : 000 , 000,1 53 , 000 , 000 , 200,1 64 
4681 .- 204 , 000,041 , 20 8 , 244 , 238,240 

4687 -. 068,01 8 , 238,071 ,01 8 , 224,204 
4693 : 000 , 240 , 007 , 202 , 208 , 224,1 98 
4699 : 1 65,1 80 , 208 , 222 , 096,1 65,1 03 
4 70 5 : 1 81 ,1 70,00 5,1 80,20 8,001 ,074 
4711 096 , 024,1 38,101 , 039,141 ,1 30 

4717 : 139 , 018 , 165 , 038 , 141 , 138,236 
4723 : 01 8 , 024 , 138,101 ,1 59,141 ,1 84 
4729 : 1 42 , 018 , 165,1 58 , 141 , 141,118 
4 73 5 : 01 8 , 232 , 164,1 80 , 208 , 004,165 
4741 : 240 , 013 , 160 , 255 , 185 , 000 , 218 
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4 74 7 : 000,1 53 , 000 , 000,1 36,1 92,1 08 
4753 : 255 , 208 , 245 , 206,1 39,01 8,1 92 
47 59 -. 206,1 4 2,01 8 , 202 , 208 , 234,1 37 
4765 : 096,1 69 , 044,1 33,1 95,1 33,1 59 
4771 : 020 , 169 , 016 , 133 , 196 , 169,098 

4777 : 148 , 133 , 021 , 173 , 252 , 040,168 
4783 : 133 , 251 , 173 , 253 , 040 , 133,134 
4789 : 2 52,1 73 , 255 , 040 , 032,01 4,1 79 
479 5 : 020,1 62,00 2,1 60 , 000,1 73,1 92 
4 801 : 020 , 023,1 45 , 020,1 77,2 51 ,061 

4807 : 153 , 008 , 041 , 200 , 041 , 127,001 
4813 -. 201 , 031 , 240 , 019 , 192 , 022,142 
481 9 : 208 , 235,1 36,1 77,251 ,041 ,235 
4825 : 1 27,201 , 032 , 240 , 005,1 36,1 90 
4831 : 208 , 245 , 160,021 , 200 , 132,165 

4 837 : 0 59,1 36,1 85,00 8,041 ,1 45,035 
4843 : 195 , 136 , 016 , 248 , 164 , 059,029 
4849 : 024,1 52,101 ,251 ,1 33,251 ,129 
4855 : 1 65 , 252,1 05 , 000,1 33 , 252,1 30 
4 861 : 224 , 002 , 208 , 003 , 140,251 ,057 

4867 : 040 , 192 , 022 , 240 , 008 , 169,162 
4873 : 032 , 145 , 195 , 200 , 076 , 004,149 
4 879 : 01 9 , 024,1 65,1 95,1 05 , 022,033 
4885 : 1 33,1 95,1 33 , 020 , 144 , 004,1 38 
4891 : 230 , 196 , 230 , 021 , 232 , 224,136 

4 897 : 023 , 240 , 003 , 076,1 90,01 8,071 
490 3 : 165,251 ,141 , 006,041 ,1 65,040 






4909 

: 252 

*141 

,007 

,041 

,096 

*173 

,243 

4915 

: 243 

,040 

,133 

,251 

*141 

,252 

,087 

4921 

: 040 

*141 

,002 

,041 

,133 

,057 

,21 5 

4927 

: 1 73 

,244 

,040 

*133 

,252 

*141 

,022 

4933 

: 253 

,040 

*141 

,003 

,041 

,133 

,168 

4939 

: 058 

,056 

,173 

,246 

,040 

,237 

*117 

4945 

: 244 

,040 

, 1 70 

,169 

,032 

,160 

, 1 28 

4951 

: 255 

,198 

,252 

*145 

,251 

,200 

, 1 08 

4957 

: 230 

,252 

*145 

,251 

,200 

,208 

,099 

4963 

: 251 

,230 

,252 

,202 

,208 

,246 

,208 

4969 

: 1 45 

,251 

,096 

, 1 33 

,059 

,132 

*153 

4975 

: 060 

,160 

,000 

*177 

,059 

,240 

,039 

4981 

: 006 

,032 

,210 

,255 

,200 

,208 

,004 

4987 

: 246 

,096 

,032 

,228 

,255 

,240 

, 1 96 

4993 

: 251 

,096 

, 1 69 

,000 

*141 

,255 

,01 7 

4999 

: 040 

,141 

,243 

,040 

,141 

*245 

,21 7 

5005 

: 040 

*141 

,247 

,040 

*141 

,249 

,231 

501 1 

: 040 

*141 

,155 

,041 

*141 

,196 

,093 

501 7 

: 041 

,169 

,045 

,024 

,105 

,001 

,026 

5023 

: 1 41 

,244 

,040 

,056 

,165 

,056 

,093 

5029 

: 233 

,001 

*141 

,250 

,040 

,056 

,118 

5035 

: 233 

,004 

*141 

,248 

,040 

,056 

,125 

5041 

: 233 

,001 

*141 

,246 

,040 

,169 

,239 

5047 

: 255 

*141 

,153 

,041 

,032 

,202 

,239 

5053 

: 023 

,169 

*147 

,076 

,210 

,255 

,045 

5059 

: 1 69 

,128 

*141 

,138 

,002 

,133 

,138 

5065 

:1 57 

,173 

,005 

,023 

,032 

,241 

,064 

5071 

: 022 

*173 

,243 

,040 

,133 

,057 

,107 

5077 

: 1 73 

,244 

,040 

,133 

,058 

,032 

,125 

5083 

: 234 

,01 9 

,169 

,072 

,160 

,039 

,144 

5089 

: 032 

,108 

,01 9 

,238 

,254 

,040 

, 1 48 

5095 

: 076 

*134 

,021 

,032 

,250 

,01 9 

,251 

5101 

: 1 69 

,054 

,160 

,039 

,032 

,108 

,031 

5107 

: 01 9 

,169 

,000 

,141 

,254 

,040 

,098 

51 1 3 

: 096 

,162 

,043 

,169 

,160 

*157 

,01 2 

51 1 9 

: 000 

,01 6 

,202 

,01 6 

,250 

,169 

, 1 40 

51 25 

: 01 9 

,032 

,210 

,255 

,169 

,01 8 

, 1 96 

51 31 

: 076 

,21 0 

,255 

*141 

*134 

,002 

,061 

51 37 

: 1 62 

,043 

*157 

,000 

, 1 48 

,202 

*21 7 

51 43 

-.016 

,250 

,096 

,072 

,041 

,128 

*114 

5149 

: 074 

*133 

,059 

,104 

,041 

,063 

,247 

51 55 

: 005 

,059 

,096 

,160 

,000 

*177 

,020 

5161 

: 057 

,133 

,002 

,160 

,000 

*177 

,058 

51 67 

: 057 

,073 

,128 

,145 

,057 

,032 

,027 

51 73 

: 1 58 

,01 8 

*173 

*141 

,002 

,041 

,074 

51 79 

: 004 

,240 

,009 

,165 

,197 

,201 

,107 

51 85 

: 064 

,240 

,003 

,076 

,216 

,020 

*172 

5191 

: 032 

,228 

,255 

,208 

,01 3 

,165 

,204 

51 97 

: 1 62 

,041 

,01 6 

,240 

,229 

,169 

,166 

5203 

: 000 

,133 

,162 

,076 

,044 

,020 

,006 

5209 

: 1 70 

,160 

,000 

,165 

,002 

,145 

,21 9 

521 5 

: 057 

,224 

,095 

,208 

,01 2 

,032 

,21 1 

5221 

: 069 

,022 

,169 

,032 

, 1 60 

,000 

,041 

5227 

: 1 45 

,057 

,076 

,038 

,020 

*173 

,104 

5233 

: 254 

,040 

,240 

,007 

,138 

,072 

,096 

5239 

: 032 

,234 

,01 9 

,104 

,170 

, 1 38 

,048 


52 4 5 : 201 ,01 3 , 208 , 002,1 62 , 095,038 
52 51 : 1 38,041 ,1 27,201 , 032,1 44,046 
52 57 : 1 00 , 224,1 60 , 208 , 002,1 62,225 
526 3 : 032,1 3 8 , 072,1 60 , 000,1 77,21 0 
5269 : 057 , 201 , 031 , 240 , 005 , 173,088 
5275 : 255 , 040 , 240 , 003 , 032 , 015,228 
52 81 : 026,1 04 , 032 , 026 , 020,1 60,01 7 
52 87 : 000,1 4 5 , 057,0 32,1 58,01 8,065 
52 93 : 0 56,1 6 5,0 57,23 7 , 002,041 , 21 9 
52 99 : 1 33 , 059,1 65 , 058 , 237 , 003,066 

530 5 : 041 , 005 , 059 , 144,01 4 , 165,101 

531 1 : 0 57,1 05 , 000,1 41 , 002,041 ,025 
5317 : 1 65 , 058 , 105 , 000,1 41 , 003,1 57 
5323 :041 ,2 30 , 057 , 208,00 2 , 230,20 3 
5329 : 058 , 032 , 134 , 021 , 076 , 038,056 
5335 : 020,1 60 , 000,1 6 5 , 002,1 45,1 95 
5341 : 057 , 024,1 6 5,1 9 7,1 0 5 , 064,065 
534 7 : 1 70,1 32,1 62,1 65,1 62,201 , 1 95 
5353 : 010 , 208 , 250 , 132 , 198 , 138,145 
5 359 : 1 74,01 6,021 ,221 ,01 6,021 , 1 96 

536 5 : 240 , 006 , 202 , 208 , 248 , 076,201 
5371 : 038 , 020 , 202,1 38 , 010,1 70,061 

537 7 : 169 , 020,07 2,1 69 , 037 , 072,02 8 

5383 :1 89 , 057,021 , 072,1 89 , 056,079 
5389 :021 , 072 , 096 , 039 , 029,1 57,1 71 
5395 : 137 , 133 , 099 , 085 , 138 , 134,233 
5401 : 020,1 48 , 082,01 9 , 076,1 47,005 

5407 : 135 , 139 , 113 , 136 , 140 , 091,017 
5413 : 145 , 017 , 121 , 074 , 090 , 097,069 
541 9 : 077 , 070,1 1 8 , 072,081 , 108,057 
54 25 : 107,1 1 0 , 003,1 31 , 084,141 ,1 1 3 
54 31 : 083,0 59 , 022 , 068 , 022 , 079,1 32 
54 37 : 022,1 33 , 022 , 229 , 022 , 005,238 
5443 : 023 , 020 , 023,1 22 , 023,1 75,1 97 
5449 : 024 , 014 , 026 , 227 , 024 , 039,171 
54 5 5 : 025,1 1 6 , 026,1 46 , 026,1 81 ,087 
5461 : 026,21 4 , 026,04 9 , 027 , 063,234 
54 67 : 029 , 048 , 028,1 4 8,02 9 , 020,1 37 
5473 : 023 , 122 , 023 , 191 , 029 , 203,176 
5479 : 030 , 095 , 031 , 201 , 022 , 235,205 
54 85 : 0 31 , 029 , 029 , 131 , 036 , 202,055 

54 91 : 024,1 1 1 ,031 ,201 ,02 3 , 028,021 

5497 : 037 , 027 , 039 , 203 , 025 , 195,135 
550 3 : 025 , 191 , 037 , 243 , 025 , 251 , 131 
5509 : 0 36 , 032 , 228,021 , 056,1 6 5,1 59 
5515 : 057 , 237 , 252 , 040 , 165 , 058,180 
5521 : 237 , 253 , 040 , 176 , 032 , 056,171 
5527 : 1 73 , 252 , 040 , 237 , 243 , 040,1 1 2 
5533 : 1 33 , 059,1 73 , 253 , 040 , 237,028 
5539 : 244 , 040 , 005,0 59 , 240,01 3,2 52 
554 5 : 1 6 5 , 057 , 141 , 252 , 040 , 165,221 
5551 : 058 , 141 , 253 , 040 , 032 , 158,089 
5557 : 01 8 , 056,1 73 , 006,041 ,22 9,1 92 
5563 : 057 , 133 , 251 , 173 , 007 , 041,081 
5569 : 229 , 058 , 133 , 252 , 005 , 251,097 

55 75 : 240 , 002,1 76 , 024 , 024,1 73,070 
5581 : 252 , 040 , 109 , 251 , 040 , 141,014 
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5587 : 2 52 , 040,1 73,2 53,04 0,1 05,0 50 

559 3 : 000,1 41 , 253 , 040 , 032,1 58,073 
5599 : 01 8 , 076 , 182 , 021 , 096,0 56,160 

560 5 : 1 73 , 002,041 , 237 , 245 , 040,1 99 

5611 : 1 33 , 059,1 73 , 003,041 , 237,1 1 3 

5617 : 246 , 040 , 005 , 059 , 144 , 012,235 
56 2 3 : 1 73,2 45 , 040,1 41 , 002,041 ,1 21 
5629 : 1 7 3 , 246 , 040 , 141 , 003 , 041,129 
5635 : 056 , 165 , 057 , 237 , 243 , 040,033 
5641 : 1 33 , 059,1 65 , 058 , 237 , 244,1 37 

5647 : 040 , 005 , 059 , 176 , Oli , 173,223 
5653 : 243 , 040,1 33 , 057,1 73 , 244,1 43 
56 59 : 040 , 133 , 058 , 096,0 56,1 65,063 
5665 : 057 , 237 , 002 , 041 , 133 , 059,050 
5671 : 1 65 , 058 , 237 , 003,041 , 005,036 

5677 : 0 59,1 76,001 , 096,1 73,00 2,040 
5683 : 041 , 133 , 057,1 73 , 003 , 041,243 

56 89 : 1 33 , 058 , 096 , 230 , 057,20 8,071 

5695 : 002 , 230 , 058 , 076 , 134 , 021,072 
5701 : 165 , 057 , 208 , 002 , 198 , 058,245 

5707 : 198 , 057 , 076 , 134 , 021 , 165,214 
5713 : 057 , 133 , 251 , 165 , 058 , 133,110 
5719 : 252 , 198 , 252,1 60 , 255 , 177,101 

57 25 s 251 , 201 , 032 , 240 , 004 , 201 , 254 

5731 : 031 , 208 , 003 , 136 , 208 , 243,160 

57 37 : 1 77 , 251 , 201 , 032 , 240 , 008,246 
5743 : 201 ,031 , 240 , 004 , 136 , 208,163 
5749 : 243 , 096 , 056 , 152 , 101 , 251,248 
57 55 : 1 33 , 057 , 165 , 252,1 0 5 , 000,067 
5761 : 133 , 058 , 076 , 134 , 021 , 160,199 
5767 : 000,1 77 , 057,201 , 032 , 240,074 
5773 : 008 , 201 , 031 , 240 , 004 , 200,057 
5779 : 208 , 243 , 096,2 00 , 208 , Oli ,089 
5785 : 230 , 058 , 165 , 058 , 205 , 003,104 
57 91 : 041 , 1 44 , 002 , 208 , 025,1 77,244 

5797 : 057,201 , 032 , 240 , 236,201 , 1 08 
580 3 : 031 , 240 , 232 , 024 , 152 , 101 , 183 
5809 : 057 , 133 , 057 , 165 , 058 , 105,240 


5815 : 000 , 133 , 058 , 076 , 134 , 021,093 
5821 : 173 , 002 , 041 , 133 , 057 , 173,000 
5827 : 003,041 , 1 33 , 058 , 076,1 34,1 28 
58 33 : 021 , 169 , 000 , 141 , 252 , 040,0 56 
5839 :1 73 , 003,041 , 056 , 233 , 004,205 
5845 : 205 , 244 , 040 , 176 , 003 , 173,030 
5851 : 244 , 040 , 141 , 253 , 040 , 032,201 
58 57 : 1 58,01 8 , 076,1 89,0 22 , 238,1 58 
5863 : 005 , 023 , 173 , 005 , 023 , 041,245 
5869 : 01 5 , 141 , 005 , 023 , 010 , 010,185 
5875 : 010 , 010 , 133 , 059 , 173 , 005,121 
5881 : 023 , 041 , 007 , 024 , 105 , 008,201 

58 87 : 1 01 , 059,1 41 ,01 5,1 44 , 096,043 
5893 : 001 , 238 , 020 , 023 , 173,0 20,224 
5899 : 023,041 , 007,141 , 020 , 023,010 
5905 : 076 , 158 , 018 , 000 , 165 , 057,235 
5911 : 1 33 , 251 , 165 , 058 , 133 , 252,247 
5917 : 1 98 , 252,1 60 , 255,1 77 , 251 , 042 

592 3 : 201 , 046 , 240,01 2 , 201 , 033,000 
5929 : 240 , 008,201 , 063 , 240 , 004,029 

593 5 : 201 ,031 , 208 , 004,1 36 , 208,067 
5941 : 235 , 096 , 177 , 251 , 201 , 046,035 
5947 : 240 , 027 , 201 , 033 , 240 , 023,055 

59 53 : 201 , 063 , 240 , 019,201 ,031 ,052 
5959 : 240 , 015 , 136 , 208 , 235 , 198,079 
5965 : 2 52,1 65,2 52,20 5 , 243 , 040,21 0 
5971 : 176 , 226 , 076 , 110 , 023 , 132,058 
5977 : 0 59,1 98,0 59 , 200 , 240,01 0,087 
5983 : 1 77,251 ,201 , 032 , 240 , 247,21 9 
5989 : 1 36 , 076,1 1 9 , 022,1 64 , 059,1 65 
5995 : 076 , 055 , 023 , 173 , 243 , 040,205 
6001 : 1 3 3,0 57 , 173 , 244 , 040 , 133,125 
6007 : 058 , 076 , 134 , 021 , 160 , 000,056 
6013 : 1 77,0 57 , 201 , 046 , 240 , 029,107 
601 9 :201 , 033 , 240 , 025,201 , 063,1 26 
6025 : 240 , 021 , 201 , 031 , 240 , 017,119 

60 31 : 200 , 208,2 35 , 230 , 058,1 65,21 5 
6037 : 058 , 205 , 003 , 041 , 240 , 226,154 
6043 : 1 44 , 224 , 076,1 89 , 022 , 200,242 
6049 : 208 , 014 , 230 , 058 , 165 , 058,126 
6055 : 205 , 003 , 041 , 144 , 005 , 240,037 
6061 : 003 , 076 , 189 , 022 , 177 , 057,185 
6067 : 201 , 032 , 240 , 233,201 , 046,1 08 
6073 : 240 , 229 , 201 , 033 , 240 , 225,073 
6079 : 201 , 063 , 240,221 ,201 ,031 ,1 24 

60 85 : 240,21 7 , 076 , 174 , 022 , 173,075 
6091 : 247 , 040 , 141 , 119 , 041 , 173,196 

6097 : 248 , 040 , 141 , 120 , 041 , 032,063 
6103 : 250 , 019 , 169 , 093 , 160 , 039,177 
6109 : 032 , 108 , 019 , 169 , 001 , 141,179 
6115 : 254 , 040 , 096 , 056 , 165 , 057,127 

61 21 : 237 , 243 , 040,1 33 , 059,1 65,086 
6127 : 058 , 237 , 244 , 040 , 005 , 059,114 
61 3 3 : 208 , 003 , 104 , 104 , 096,1 65,1 57 
6139 : 057 , 133 , 038 , 165 , 058 , 133,067 
6145 : 039 , 096 , 056 , 165 , 057 , 133,035 
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Mappa della tastiera con Speedscript 3.0 

Usare CTRL con la maggior parte dei comandi 


Inserisce 5 spazi: 
con shift inserisce 
255 spazi 


Caratteri 
di formato 


Azzera buffer 


Delete: con shift 
inserisce uno spazio 


Backspace 



Ripristina buffer 


^Comando disco 


Erase (SWP) 


Directory 


Insert 


Stampa 


Caratteri formato! 


Home: con shift 
cancella tutto 

/ 


(DQwQj ©j©© © © ©) © G © _ 

y ©©©© © ©j©©«) 



Carattere 
di Return 



Maiuscolo 

minuscolo 


(SWP) 


Search 
A Replace 


Hunt 


Prossima frase 
con shift frase pre¬ 
cedente 


Memoria libera 


Tabella di riferimento dei comandi 


(CIRI ) A 

Maiuscolo/minuscolo 

(TTrT) a 

Colore bordo 

( CIRI 

Delete (S.W.P.) 

C”* 1 )a 

Erase (S.W.P.) 

(cm)a 

Seleziona frase da cercare 

CcTrT)[2 

Hunt con shift 

CcTrT ; a 

Entra/esce modo insert 

(TTROa 

Replace: con shift seleziona frase da rimpiazza 

( CTRL ) 3 

Svuota buHer 

(CTRL)!. 

Colore testo 

C CTRI )P 

Stampa 

( CTRl )a 

Rupristina buffer 

(CIRI ~)y 

Verify 

( CTRL^a 

Inverte i caratteri 

("CTRL') a 

Va alla fine del testo 

( CIRI )a 

Memoria libera 

( CTRL ) J 

Comando a disco 

(TTrTj^ 

Directory 

(CTRL'Jy 

LÌ Comando di formato 



Indenta; con shift di 5 spazi 
con/shift inserisce 255 spazi 


Esci 


■o 

c 


Backspace 


muio. ) Carattere di Return: 
con shift fine: fine 
paragrafo 



parola a destra 


frase precedente 

prossimo paragrafo 
paragrafo precedente 
Load 
Save 
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6151 : 158 , 073 , 255 , 101 , 038 , 141,005 
61 57 : 1 23,041 , 1 65 , 058,1 33,1 59,1 80 
6163 : 073 , 255 , 101 , 039 , 141 , 124,240 
6169 : 041 , 165 , 038 , 141 , 125,041 ,064 
61 75 : 1 65 , 039,1 41 ,1 26,041 ,1 65,1 96 
61 81 : 1 58,1 41 ,1 27,041 ,1 33 , 038,1 63 
6187 : 1 6 5,1 59 , 141 , 128 , 041 , 133,042 
61 9 3 : 0 39 , 056,1 73,1 24,041 ,1 09,079 

61 99 : 1 20 , 041,20 5 , 250 , 040,1 4 4,087 
6205 : 020 , 032 , 250 , 019 , 169 , 108,147 
621 1 : 1 60 , 039 , 032,1 08,01 9,1 69,0 82 
6217 : 001 ,1 41 , 254 , 040,1 69 , 000,166 

62 2 3 : 1 33,1 98 , 096,1 73,1 1 9,041 ,071 
6229 :1 33 , 158,1 73,1 20 , 041,1 33,075 
6235 : 1 59,1 73,1 23,041 ,1 33,1 80,1 32 
6241 ; 024 , 109 , 119 , 041 , 141 , 119,138 
624 7 : 041 , 173 , 124 , 041 , 133 , 181,028 
62 53 *. 109,1 20,041 , 1 41 ,1 20,041 ,1 69 
6259 : 032 , 035 , 018 , 173 , 125 , 041,027 
62 6 5 : 1 33,0 38,1 73,1 26,041 ,1 33,253 
62 71 : 039,1 73,1 27,041 ,1 33,1 58,030 
62 77 :1 73,1 28,041 ,1 33,1 59 , 056,055 
6283 : 1 73 , 002 , 041 , 229,1 58 , 133,107 
6289 : 180 , 173 , 003 , 041 , 229 , 159,162 

62 95 : 1 33,1 81 , 032 , 035 , 018,0 56,094 

6301 :1 73 , 002,041 , 237,1 23,041 ,006 

6 307 : 1 41 , 002 , 041 , 173 , 003 , 041,052 
631 3 : 237,1 24,041 ,1 41 ,00 3,041 ,244 

631 9 : 096,0 32 , 230 , 023 , 032 , 069,1 45 

632 5 :022, 032 , 003 , 024,0 56,1 73,235 

6331 :1 1 9,041 , 233,001 ,141 ,1 1 9,073 

63 37 : 041 , 173 , 120 , 041 , 233 , 000,033 

6 34 3 : 1 41 ,1 20 , 041 , 096,1 73,141 ,143 
6349 : 002,201 ,00 5,20 8,00 3 , 076,1 88 
6355 : 081 , 025 , 032 , 060 , 022 , 032,207 
6361 : 2 30 , 023 , 032 , 069 , 022 , 032,1 1 3 

6367 : 003 , 024 , 076,1 85 , 024 , 032,0 55 
6373 : 202 , 023,1 69 , 002 , 032,01 4,1 59 
6379 : 020,0 32 , 250,01 9,1 69,1 20,077 
6385 :1 60 , 039 , 032,1 08,01 9 , 032,1 1 9 
6391 : 1 25,01 9 , 072 , 032 , 234,01 9,236 

6 3 97 : 1 04,041 ,1 91 ,201 , 023 , 208,253 
640 3 : 009 , 032 , 230 , 023 , 032 , 080,1 53 
6409 : 022 , 076 , 003 , 024,201 ,01 9,098 
6415 : 208 , 009 , 032 , 230 , 023 , 032,037 
6421 : 021 , 023 , 076 , 003 , 024,201 ,1 1 3 
6427 :01 6 , 208 , 009 , 032 , 230 , 023,033 

64 3 3 : 0 32,21 5 , 026 , 076,00 3 , 024,1 53 

64 39 : 096 , 056,1 65 , 057 , 237 , 252,1 34 
64 45 : 040,1 33 , 059,1 65 , 058 , 237,225 
64 51 : 253 , 040 , 005 , 059 , 240,01 1 ,1 47 
64 57 :1 73 , 252 , 040,1 33 , 057,1 73,1 1 7 
64 63 : 253 , 040,1 33 , 058 , 096,1 73,04 8 
6469 : 243 , 040 , 133 , 057 , 173 , 244,191 
64 75 : 040,1 33 , 058 , 076,1 34,021 ,02 5 
64 81 : 165 , 057 , 133,251 , 133 , 158,210 


64 87 : 1 65 , 058,1 33 , 252,1 33,1 59,21 9 
64 9 3 : 1 60 , 000,1 77,251 ,201 , 032,146 
64 9 9 : 20 8,0 30 , 200 , 208,24 7 ,, 1 6 5,1 33 
6505 : 252 , 205 , 003 , 041 , 144 , 015,253 
6511 si 73 , 002,041 ,1 33,251 , 1 73,1 1 6 
651 7 : 00 3,041 ,1 33 , 252,1 60 , 000,1 94 
6523 : 076 , 131 , 025 , 230 , 252 , 076,145 
6529 : 095 , 025 , 024 , 152 , 101 , 251,009 
6535 : 1 33 , 038 , 169 , 000,1 01 , 252,060 
6541 : 1 33 , 039,0 56,1 73 , 002,041 ,073 

6547 : 229 , 158 , 133 , 180 , 173 , 003,255 
6553 : 041 , 229 , 159 , 133 , 181 , 056,184 
6559 :1 65 , 038 , 229 , 158 , 141 , 123,245 
656 5 : 041 , 165 , 039 , 229,1 59 , 141,1 71 
6571 :1 24,041 , 032,0 3 5,01 8,0 56,221 

6577 : 1 73 , 002,041 , 237,1 23,041 ,026 
6 583 : 1 41 , 002,041 ,1 73 , 003,041 ,072 
6589 : 237,1 24,041 , 1 41 , 003,041 ,008 
659 5 : 096,1 69 , 255,1 41 ,1 48,041 ,021 
6601 : 076 , 222 , 025,1 69 , 005,1 41 ,071 

6607 : 148 , 041 , 032 , 222 , 025 , 177,084 
661 3 : 057,201 , 032 , 208,001 , 200,1 44 
661 9 : 076,1 74 , 022,1 69 , 000,1 41 ,033 
6625 -. 149,041 , 032 , 037 , 026 , 169,167 
66 31 : 032,1 74,1 4 8,041 ,1 60 , 000,01 8 

6637 : 1 45,0 57 , 200 , 202 , 208 , 250,01 9 
664 3 : 096 , 032,01 5 , 026 , 032,01 5,203 
6649 : 026 , 169 , 031 , 160 , 000 , 145,012 
66 55 : 057 , 200,1 4 5,0 57,0 32,1 58,1 36 
6661 :01 8 , 032 , 060 , 022 , 032 , 060,229 

6667 : 022 , 076 , 204 , 025,1 69,001 ,2 52 
6673 : 1 41 ,1 48,041 ,1 69 , 000,1 41 ,1 45 
6679 : 1 49,041 , 032,0 37 , 026,1 69,221 
6685 : 032,1 60 , 000,1 4 5 , 057 , 076,24 3 
6691 : 1 34,021 , 024,1 73,00 2,041 ,1 74 
6697 :1 09,1 4 8,041 ,1 73,00 3,041 ,04 4 
6703 :1 09,1 49,041 ,20 5 , 246 , 040,069 
6709 : 144 , 005 , 104 , 104 , 076 , 116,090 
671 5 : 026 , 024,1 65,0 57,1 33 , 038,246 
6721 : 109 , 148 , 041 , 133 , 158 , 165,051 
6727 : 058 , 133 , 039 , 109 , 149 , 041,088 
6733 :1 33,1 59 , 056,1 73 , 002,041 ,1 29 
6739 : 229,0 38,1 33,1 80,1 73 , 003,071 
674 5 : 041 , 229 , 039,1 33,1 81 , 032,232 
6751 : 096,01 8 , 024,1 73 , 002,041 ,1 93 
6757 :1 09,1 48,041 ,1 41 , 002,041 ,071 
6763 :1 73 , 003,041 ,1 09,1 49,041 ,1 1 1 

676 9 : 1 41 ,00 3,041 , 096,1 73,2 55,054 

677 5 : 040 , 073 , 006,1 41 ,2 55 , 040,1 62 
6781 : 096,1 69,1 3 5,1 60 , 039 , 032,244 
6787 : 1 08,01 9 , 032 , 228 , 255 , 240,245 
6793 : 251 , 201 , 147 , 240 , 247 , 041,240 
6799 :1 27,201 , 089 , 096,1 69 , 002,0 59 
6 80 5 : 0 32,01 4 , 020 , 032,2 50,01 9,004 
681 1 :1 69,1 48,1 60 , 039 , 032,1 08,043 
681 7 : 01 9 , 032,1 26 , 026 , 240,00 3,095 
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6823 

6829 

6835 

6841 

6847 

6853 

6859 

6865 

6871 

6877 

6883 

6889 

6895 

6901 

6907 

691 3 

691 9 

6925 

6931 

6937 

6943 

6949 

6955 

6961 

6967 

6973 

6979 

6985 

6991 

6997 

.7003 

7009 

701 5 

7021 

7027 

7033 

7039 

7045 

7051 

7057 

7063 

7069 

7075 

7081 

7087 

7093 

7099 

71 05 

71 1 1 

711 7 

71 23 

71 29 

71 35 

71 41 

7147 

71 53 


: 076 , 234 , 019 , 162 , 250 , 154,038 
: 0 32,0 50,01 9 , 032,1 95,01 9,00 8 
: 076 , 038 , 020 , 160 , 000 , 177,138 

: 057,201 ,031 , 240,01 7 , 200,1 63 
: 208 , 247 , 230 , 058,1 65 , 058,1 33 
: 205 , 003,041 ,1 44 , 238 , 240,044 
: 236 , 076,1 89 , 022 , 200 , 208,1 1 0 
: 002 , 230 , 058 , 076,1 74 , 022,003 
: 1 65,0 57,1 33,251 , 165 , 058,020 
: 1 33 , 252,1 98 , 252,1 60 , 255,1 91 
: 177 , 251 , 201 , 031 , 240 , 017,120 
: 136 , 192 , 255 , 208 , 245 , 198,187 
: 252,1 6 5 , 252 , 205 , 244 , 040,1 1 7 
: 1 76 , 236 , 076,1 1 0,02 3 , 056,1 54 
: 1 52,1 01 ,251 ,1 33,251 ,1 69,028 
: 000,1 01 ,2 52,1 33 , 252,0 56,027 
: 165 , 251 , 229 , 057 , 133 , 059,133 
: 165 , 252 , 229 , 058 , 005 , 059,013 
: 208,01 8,1 32 , 059 , 024,1 65,1 1 3 
: 251 , 229 , 059,1 33,251 ,1 65,089 
: 252 , 233 , 000,1 33,2 52 , 076,209 
: 233 , 026,1 65,2 51 ,1 33 , 057,1 34 
: 165 , 252 , 133 , 058 , 076 , 134,093 
: 021 ,1 73,1 41 , 002,041 ,001 ,1 72 
: 208 , 003 , 032 , 202 , 023 , 032,043 
: 250 , 019 , 169 , 158 , 160 , 039,088 
: 032,1 0 8,01 9,1 60 , 000,1 77,051 
: 057 , 073 , 128 , 145 , 057 , 032,053 
: 158 , 018 , 160 , 000 , 177 , 057,137 
: 073,1 28,1 4 5 , 057,1 69 , 002,1 47 
: 032 , 014 , 020 , 032 , 125 , 019,077 
: 009 , 064,201 ,0 87,20 8 , 009,1 63 
: 0 32,1 4 4 , 027 , 032,1 34 , 022,23 8 
: 076,1 59,02 7,201 , 083 , 208,095 
: 009,0 32,1 4 4 , 027 , 032,1 23,226 
: 023,0 76,1 59 , 027,201 , 080,1 75 
: 208 , 009 , 032,1 44 , 027 , 032,067 
: 1 82 , 026 , 076,1 59 , 027 , 032,1 2 3 
: 134 , 021 , 076 , 234 , 019 , 165,020 
: 057,1 33,1 58,1 41 ,1 1 3,041 ,020 
: 1 65 , 058 , 133,1 59 , 141 , 114,1 53 
: 041 , 096 , 056,1 65,0 57,1 33,1 93 
: 038 , 237,1 1 3,041 ,1 41 ,1 23,088 
: 041 ,1 65 , 058,1 33 , 039 , 237,074 
: 1 1 4 , 041 , 141 , 124 , 041 , 032,1 56 
: 026 , 024,1 73,1 1 3 , 041 ,1 33,1 79 
: 057 , 173 , 114 , 041,133 , 058,251 
: 0 32,1 58,01 8 , 076 , 070 , 027,062 
: 1 69 , 044 , 229,21 1 ,1 41 , 004,229 
: 041 ,1 60 , 000,1 69,1 66 , 032,005 
: 21 0,2 55,1 69,1 57 , 032,21 0,220 
: 255,1 40 , 005,041 , 032,1 25,04 7 
: 01 9,1 72 , 005,041 ,1 33 , 059,1 40 
: 169 , 032 , 032 , 210 , 255 , 169,072 
: 1 57 , 032,21 0 , 255,1 65 , 059,089 
: 201 ,01 3,2 40 , 050,201 , 020,1 98 


71 59 

: 208 

,01 5 

,136 

,01 6 

,004 

,200 

,058 

71 65 

: 076 

,208 

,027 

,169 

* 1 57 

,032 

,154 

71 71 

: 21 0 

,255 

,076 

,208 

,027 

,165 

,176 

71 77 

: 059 

,041 

,127 

,201 

,032 

,144 

, 101 

71 83 

: 1 92 

,204 

,004 

,041 

,240 

,187 

,115 

71 89 

: 1 65 

,059 

,153 

,048 

,041 

,032 

,007 

71 95 

: 21 0 

,255 

, 1 69 

,000 

,133 

,212 

,238 

7201 

: 1 33 

,216 

,200 

,076 

,208 

,027 

,125 

7207 

: 032 

,21 0 

,255 

,169 

,000 

,153 

,090 

721 3 

: 048 

,041 

,152 

,096 

,032 

,250 

,152 

721 9 

: 01 9 

,169 

,214 

,160 

,039 

,032 

,172 

7225 

: 1 08 

,01 9 

,032 

,148 

,028 

,176 

,056 

7231 

: 032 

,173 

,243 

,040 

,133 

,251 

,167 

7237 

s 1 73 

,244 

,040 

,133 

,252 

,174 

,061 

7243 

: 002 

,041 

,172 

,003 

,041 

,169 

,247 

7249 

: 251 

,032 

,21 6 

,255 

,176 

,009 

,252 

7255 

: 1 65 

, 1 44 

,041 

» 1 91 

,208 

,003 

,071 

7261 

: 076 

,130 

,029 

,240 

,036 

,173 

,009 

7267 

: 1 47 

,028 

,201 

,008 

,144 

,006 

,121 

7273 

: 032 

,202 

,036 

,076 

,128 

,028 

,095 

7279 

: 1 73 

,147 

,028 

,201 

,001 

,240 

,133 

7285 

: 249 

,032 

,250 

,01 9 

,169 

,220 

,032 

7291 

: 1 60 

,039 

,032 

,108 

,01 9 

,169 

,138 

7297 

: 001 

,141 

,254 

,040 

,096 

,032 

, 1 81 

7303 

: 250 

,019 

,169 

,231 

,160 

,039 

,235 

7309 

: 032 

, 1 08 

,01 9 

,076 

,128 

,028 

,020 

7315 

: 000 

,032 

,199 

,027 

,240 

,022 

,155 

7321 

: 1 69 

,006 

,160 

,040 

,032 

, 108 

,156 

7327 

: 01 9 

,032 

,125 

,01 9 

,162 

,008 

,01 2 

7333 

: 201 

,068 

,240 

,01 2 

,162 

,001 

,081 

7339 

: 201 

,084 

,240 

,006 

,032 

,234 

,200 

7345 

: 01 9 

,104 

,104 

,096 

,142 

,147 

,021 

7351 

: 02 8 

,169 

,001 

,160 

,000 

,032 

,061 

7357 

: 1 86 

,255 

, 1 60 

,000 

,224 

,001 

,247 

7363 

: 240 

,049 

,185 

,048 

,041 

,201 

,191 

7369 

: 064 

,208 

,01 4 

,1 85 

,049 

,041 

,250 

7375 

: 201 

,058 

,240 

,035 

,185 

,050 

,208 

7381 

: 041 

,201 

,058 

,240 

,028 

,169 

,1 82 

7387 

: 048 

,141 

,088 

,041 

,169 

,058 

,252 
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7393 : 141 , 089 , 041 , 185 , 048 , 041,002 
7399 : 1 53 , 090,041 , 200 , 204,00 5,1 56 
7405 : 041 , 144 , 244 , 240 , 242 , 200 , 068 
741 1 : 076 , 002 , 029,1 85,04 8,041 ,1 1 2 

741 7 : 1 53 , 088,041 , 200 , 204,00 5,1 72 
74 23 : 0 41 , 208 , 244 , 140,1 12,041 ,01 7 
74 2 9 : 032 , 250,01 9,1 69,04 8,1 60,1 71 
74 3 5 : 041 , 032,1 08,01 9,1 73,1 1 2,240 
74 41 : 041 , 162 , 088,1 60 , 041 , 032,029 

7447 : 189 , 255 , 169 , 013 , 076 , 210,167 
7453 : 255 , 032 , 250 , 019 , 169 , 196,182 
74 59 -.1 60 , 039 , 032,1 08,01 9 , 032,1 69 
74 65 : 1 25,01 9 , 032 , 026 , 020 , 009,01 6 
74 71 : 1 2 8 , 072,1 73 , 255 , 040 , 240,1 87 

7477 : 003 , 032,01 5 , 026 , 032 , 234,139 
7483 : 019 , 104 , 076 , 166 , 020 , 056,244 
7489 : 165 , 057 , 237 , 243 , 040 , 133,172 
7495 : 251 , 165 , 058 , 237 , 244 , 040,042 
7 501 : 005,251 , 240,00 7,1 6 9 , 005,24 2 

7 50 7 : 1 33,251 , 032,01 4 , 020 , 032,053 
7513 : 250 , 019 , 169 , 026 , 160 , 040,241 
751 9 -. 032,1 08,01 9 , 032,1 48 , 028,206 
7525 : 165 , 251 , 201 , 005 , 240 , 003,198 
7531 : 032 , 050,01 9,1 69 , 000,1 66,031 
7537 : 057 , 164 , 058 , 032 , 213 , 255,124 
754 3 : 1 44 , 003 , 076 , 096 , 028,1 42,096 
7 54 9 : 002,041 ,1 40 , 003,041 , 032,1 28 
7555 : 234 , 251 , 032 , 231 , 255 , 032,142 
7561 : 250,01 9,1 69 , 252,1 60 , 039,002 

7567 : 032,1 08,01 9 , 076,1 28,02 8,02 2 
7573 : 032 , 250 , 019 , 169 , 032 , 160,043 
7579 : 040 , 032,1 08,01 9 , 032,1 48,022 

7585 : 02 8,1 6 9,001 ,1 74 , 243 , 040,048 
7591 : 1 72,24 4 , 040,0 32,21 3 , 255,099 

7 597 : 1 65,1 44,041 ,1 91 , 240 , 207,1 37 
760 3 : 0 32,2 50,01 9,1 69 , 239,1 60,024 
7609 : 039 , 032 , 108 , 019 , 076 , 128,075 
7615 : 028 , 169 , 147 , 032 , 210 , 255 , 008 
7621 : 1 69,01 3,0 32 , 210 , 255 , 032,140 

762 7 : 236 , 029,1 69,01 3,0 32,21 0,1 24 
76 3 3 : 255,1 69 , 040,1 60 , 040 , 032,1 37 
76 39 :1 08,01 9 , 032 , 228 , 255,201 ,034 

764 5 : 01 3 , 208 , 249 , 076 , 234,01 9,252 
7651 : 0 32 , 204 , 255,1 69,001 , 032,1 52 

76 57 -.1 95 , 255 , 096 , 032,231 , 255,01 7 
7663 : 1 69,001 ,1 62,00 8,1 60 , 000,22 7 
766 9 : 032,1 86 , 255,1 69,001 ,1 62,026 
7675 : 069,1 60 , 040 , 032,1 89,2 55,22 8 
76 81 : 0 32,1 92 , 255,1 76,221 ,1 62,01 5 
76 87 : 001 , 032,1 98,2 55 , 032,081 ,094 
7693 : 030 , 032 , 081 , 030 , 032 , 081,043 
7699 : 030 , 032,081 , 030 , 240 , 202,1 22 
7705 : 032 , 204 , 255 , 032 , 228 , 255,007 
771 1 : 201 , 032,20 8,00 3 , 032,1 25,1 20 

771 7 : 01 9,1 62,001 , 032,1 98 , 255,1 92 
7723 : 032,081 , 030 , 072 , 032,081 ,1 1 5 


7729 : 030 , 168 , 104 , 170 , 152 , 032,193 

773 5 : 205,221 ,1 69 , 032 , 032,21 0,1 56 

7741 : 255 , 032 , 081 , 030 , 240 , 006,193 

774 7 : 0 32,21 0,2 55 , 076 , 062 , 030,220 

7753 : 1 69,01 3 , 032,21 0 , 255 , 076,060 
7759 : 01 7,0 30,0 32 , 207 , 255 , 072,1 80 
776 5 : 1 65 , 144 , 041 , 191 , 240 , 006,104 
7771 : 1 04,1 04,1 04 , 076 , 227,02 9,22 3 

7777 : 1 04 , 096,1 62 , 000,1 42,1 1 5,204 

77 8 3 : 041 ,1 42,1 1 6,041 ,1 42,1 1 7,1 90 

7789 : 041 ,1 42,1 1 8,041 , 056,1 77,1 72 
7795 : 251 , 233 , 048 , 144 , 042 , 201,010 
7801 : 01 0,1 76 , 038,01 4,1 1 5,041 ,003 

780 7 : 046,1 1 6,041 ,01 4,1 1 5,041 ,244 
7813 : 046,1 1 6,041 ,01 4,1 1 5,041 ,250 

781 9 : 046,1 1 6,041 ,01 4,1 1 5,041 ,000 
7825 : 046,1 16,041 ,01 3,1 1 5,041 ,005 

78 31 :1 41 , 11 5 , 041 , 200 , 208 , 212,044 

783 7 : 230 , 252 , 076,1 1 3,0 30,24 8,082 

784 3 :1 73,1 1 5,041 ,01 3,1 1 6,041 ,1 50 

78 4 9 : 240 , 028,0 56,1 73,1 1 5,041 ,054 
78 55 : 233,001 ,1 41 ,1 1 5,041 ,1 73,1 1 1 
7861 : 116 , 041 , 233 , 000 , 141 , 116,060 

7867 : 041 , 238,1 1 7,041 , 208 , 003,0 67 
/873 : 238,1 1 8,041 , 076,1 63 , 030,091 
7879 : 1 73,1 1 7,041 ,21 6 , 096,0 56,1 30 
788 5 :1 73,1 1 9,041 , 237,24 7 , 040,038 
7891 :1 41 ,1 21 ,041 ,1 73,1 20,041 ,080 

7897 : 237 , 248 , 040,1 41 , 1 22,041 ,022 
790 3 : 01 3,1 21 ,041 , 208,01 6 , 032,1 42 
7909 : 250,01 9,1 69 , 078,1 60 , 040,1 77 
7915 : 032 , 108 , 019 , 169 , 001 , 141,193 
7921 : 254 , 040,0 96 , 024,1 65,0 57,1 09 

792 7 :1 33 , 038,1 09,1 21 ,041 ,1 33,054 
7933 : 158 , 165 , 058 , 133 , 039 , 109,147 
7939 : 122 , 041 , 133 , 159 , 056 , 173,175 
794 5 : 002,041 ,22 9 , 038,1 33,1 80,1 20 
7951 :1 73 , 003,041 , 229 , 039 , 133,121 

7957 si 81 , 024 , 101,1 59 , 205 , 246,1 69 

796 3 : 040,1 44,01 6 , 032 , 250,01 9,01 6 
7969 -.1 69,0 70,1 60 , 040 , 032,1 0 8,1 00 

797 5 : 01 9,1 69,001 ,1 41 , 254 , 040,1 51 

7981 : 096 , 032 , 096,01 8 , 024,1 73,228 

7987 :1 21 ,041 ,1 33,1 80,1 09 , 002,1 25 
7993 : 041 ,1 41 , 002,041 ,1 73,1 22,065 
7999 : 041 ,1 33,1 81 ,1 09 , 003,041 ,059 

800 5 : 1 41 ,00 3,041 ,1 65 , 057,1 33,097 

801 1 : 1 58,1 65 , 058,1 33,1 59,1 73,1 53 

8017 : 247 , 040 , 133 , 038 , 173 , 248,192 
8023 : 040 , 133 , 039 , 032 , 035 , 018,128 

802 9 : 0 76,1 34,021 ,1 60 , 000,1 77,1 49 

80 3 5 : 057,1 70 , 200,1 77 , 057,1 36,1 28 
8041 : 145 , 057 , 200 , 138 , 145 , 057,079 

804 7 : 096,1 60 , 000,1 77 , 057,041 ,1 30 
8053 : 063 , 240 , 010 , 201 , 027 , 176,066 
80 59 : 006,1 77,0 57 , 073 , 064,1 4 5,1 33 
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806 5 : 0 57 , 076 , 060 , 022,1 33,0 59,024 
8071 : 041 , 063 , 006 , 059 , 036 , 059,143 
80.77 :01 6 , 002 , 009,1 28,1 1 2 , 002,1 54 
80 83 : 009 , 064,1 33,0 59 , 096 , 005,001 
80 89 : 075 , 066 , 005 , 058,001 ,001 ,103 

80 9 5 : 001 , 000,001 , 000 , 080 , 027,012 
8101 : 01 4,01 5,01 8,1 41 ,1 54,041 ,036 
8107 : 138 , 072 , 152 , 072 , 056 , 173,066 
8113 : 1 38 , 041 , 237 , 140 , 041 , 1 73,179 

81 1 9 : 1 39,041 , 237,1 41 ,041 , 1 44,1 58 
8125 : 025 , 173 , 154 , 041 , 032 , 210,056 
81 31 : 255,1 73,1 41 , 002,041 ,001 ,04 0 
8137 : 208 , 249 , 165 , 145 , 201 , 127,016 
81 43 : 208 , 006 , 032,1 36,0 34 , 076,1 87 
81 49 : 168 , 033 , 104 , 168 , 104 , 170,192 
81 55 : 1 73,1 54,041 , 096 , 032 , 250,1 97 
81 61 : 01 9,1 69,1 73,1 60 , 040 , 076,094 
81 67 : 1 08,01 9 , 076,1 68,0 33,1 69,036 
81 73 : 000 , 032,1 89 , 255,1 73 , 020,1 38 
81 79 : 023,1 41 , 1 34 , 002,1 69 , 004,204 
81 85 : 1 41 ,1 49,041 ,1 60 , 007,1 73,1 52 
81 91 : 1 41 , 002,041 ,001 , 208 , 003,1 39 

81 97 : 076,1 52,0 32 , 032,2 50,01 9,054 

820 3 :1 69 , 097,1 60 , 040 , 032,1 08,1 05 
8209 : 019 , 032 , 125 , 019 , 041,1 27,124 

821 5 : 1 62 , 003,1 42,1 49,041 ,201 ,209 

8221 : 083 , 240 , 086 , 162 , 008 , 142,238 

8227 : 149 , 041 , 201 , 068 , 240 , 034,000 

82 33 : 201 , 080 , 208 , 188 , 032 , 250,232 

8239 : 019 , 169 , 127 , 160 , 040 , 032,082 
8245 : 108 , 019 , 032 , 125 , 019 , 056,156 
8251 : 233 , 048,201 , 004,1 44,1 68,089 

8257 : 201 , 080,1 76,1 64,141 , 149 , 208 

826 3 : 041 , 076,1 1 8 , 032,0 32 , 250,1 08 
8269 : 01 9 , 169,1 63,1 60 , 040,0 32,148 

827 5 :1 08,01 9 , 032,1 99,02 7 , 240,1 96 
8281 : 143 , 172 , 005 , 041 , 169 , 044,151 
8287 : 153 , 048 , 041 , 200 , 169 , 087,025 
8293 : 153 , 048 , 041 , 200 , 140 , 005,176 

82 99 : 041 ,1 73 , 005,041 ,1 62 , 048,065 
8305 : 160 , 041 , 032 , 189 , 255 , 173,195 
8311 : 149 , 041 , 168 , 201 , 004 , 144,058 
831 7 : 026,201 ,00 8,1 76 , 022 , 032,078 
8323 : 250 , 019 , 169 , 142 , 160 , 040,143 
8329 : 032 , 108 , 019 , 032 , 125 , 019 , 216 
8335 : 056 , 233 , 048 , 168 , 016 , 003,155 
8341 : 076 , 233 , 031 , 169 , 001 , 174,065 
834 7 : 1 49,041 ,0 32,1 86 , 255 , 032,082 
8353 : 223,031 ,1 69,001 ,0 32,1 95,044 

83 59 : 255 , 032,1 92,25 5,1 62,001 ,04 0 

8365 : 032 , 201 , 255 , 144 , 003 , 076,116 
8371 : 168 , 033 , 162 , 000 , 142 , 130,046 

8377 : 041 , 142 , 129,041 , 142,1 50,062 
8383 :041 , 142,151 ,041 , 142 , 110,050 
8389 : 045 , 189 , 152 , 031 , 157 , 131,134 
8395 : 041 , 232 , 224,01 2 , 208 , 245,141 


8401 : 1 69 , 255,1 41 , 145 , 041 , 141,077 

840 7 : 1 43,041 ,1 62 , 004,1 89,1 63,1 49 

841 3 : 031 , 1 57 , 029 , 042 , 202 , 208,1 22 

8419 : 247 , 173 , 243 , 040 , 133 , 251,034 
8425 : 1 7 3 , 244 , 040 , 133 , 252,1 60,211 
84 31 : 000,1 40,1 44,041 , 204,1 43,1 43 

84 37 t 041 , 240 , 006 , 173 , 131 , 041 , 109 
84 43 : 1 41 , 1 44 , 041 , 177 , 251 , 016,253 
8449 : 003 , 076 , 150 , 034 , 201 , 031,240 
8455 : 240 , 044 , 153 , 109 , 042 , 200,027 
8461 : 238 , 144 , 041 , 173 , 144 , 041,026 
8467 : 205 , 132 , 041 , 144 , 230 , 140,143 
84 73 : 001 ,041 , 177,251 , 201 , 032,216 
8479 : 240 , 020 , 206 , 144 , 041 , 136,050 
8485 : 208 , 244 , 172 , 001 , 041 , 076 ,Oli 
8491 : 056 , 033 , 200 , 177 , 251 , 201,193 

84 97 : 0 32 , 240,001 ,1 36,1 4 0,001 ,087 
850 3 : 041 , 1 52 , 056,1 01 , 251 , 1 33,021 
8509 : 251 , 165 , 252 , 105 , 000 , 133,1 99 
8515 : 252 , 160 , 000 , 173 , 145 , 041,070 
8521 : 201 , 255 , 208 , 003 , 032,0 57,061 
8527 : 034 , 173 , 143 , 041 , 240 , 003,201 
8 533 : 032,101 , 034,0 56 , 046 , 143,241 
8539 : 041 , 1 73,001 ,041 , 1 41 , 000,232 
8545 : 041 , 169 , 109 , 133 , 253 , 169,203 
8551 : 042 , 133 , 254 , 032 , 103 , 038,193 
8557 -. 032 , 118 , 034 , 173 , 145,041 ,140 
8563 : 205 , 135 , 041 , 144 , 003 , 032,163 
8569 : 1 99 , 033 , 0 . 56,1 65,251 , 237,038 
8575 : 002 , 041 , 133 , 059 , 165 , 252 ,Oli 
8581 : 237 , 003 , 041 , 005 , 059 , 240,206 
8587 : 0 56,1 4 4 , 054,1 73,1 30,041 ,22 5 
8593 : 240 , Oli , 169 , 000 , 141 , 129,067 
8599 : 041 , 141 , 134 , 041 , 032 , 199,227 
8605 : 033 , 173 , 149 , 041 , 201 , 003,245 
861 1 : 208 , 003 , 032,1 25,01 9 , 032,0 70 

8617 : 225 , 255 , 240 , 251 , 173 , 255,032 
8623 : 040,141 , 134 , 002 , 169,001 ,1 50 
8629 : 032 , 195 , 255 , 032 , 231 , 255,157 
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863 5 : 162 , 250,1 54 , 032 , 234,01 9,01 4 
8641 : 076 , 038 , 020 , 076 , 238,0 32,161 

8647 : 0 56,1 73,1 33,041 , 237,1 4 5,21 6 
8653 :041 ,1 68,1 36,1 36,24 0 , 008,1 66 
8659 -.04 8 , 006 , 032,1 36 , 034,1 36,091 
8665 : 208,2 50,1 73,1 30,041 , 240,235 
8671 : 01 7,1 41 , 000,041 ,1 69,1 1 0,1 89 

8677 : 1 33,2 53,1 69,04 4,1 33,2 54,1 91 
86 83 : 032,1 01 , 034 , 032,1 03 , 038,063 
8689 : 032,1 36 , 034 , 032,1 36 , 034,1 33 

86 95 : 032,1 36 , 034,23 8,1 38,041 ,098 

8701 : 208 , 003 , 238,1 39,041 ,1 73,031 

8707 : 1 37,041 , 208,0 50,1 73 , 149,249 

871 3 :041 ,201 ,00 3 , 240,04 3,201 ,226 
8719 : 008 , 240 , 039 , 056 , 173 , 138,157 

872 5 : 041 ,23 7,1 40,041 ,1 73,1 39,024 

8731 : 041 , 237,1 41 , 041 , 144 , 024,143 

8737 : 032 , 204 , 255 , 032 , 250 , 019,057 
8743 : 1 69,1 88,1 60 , 040 , 032,1 08,224 
874 9 : 01 9,0 32,1 2 5,01 9 , 032 , 223,239 
8755 : 031 , 162 , 001 , 032 , 201 , 255,221 
8761 :1 73,1 29,041 , 240,01 7,1 41 ,030 

8767 : 000 , 041 , 169 , 109 , 133 , 253,000 
8773 : 1 69 , 043,1 33 , 254,0 32,1 01,0 33 
8779 : 034 , 032 , 103 , 038 , 032 , 136,194 
8785 : 034,1 72,1 34,041 ,1 40,1 45,235 

87 91 : 041 , 1 36,1 36,24 0 , 008,04 8,1 84 

8797 : 006,0 32,1 36 , 034,1 36,20 8,1 33 
880 3 : 250 , 096,1 69 , 032,1 72,1 31 ,1 81 
8809 : 041 ,1 40,1 44,041 ,24 0 , 006,20 5 
8815 : 032 , 168 , 031 , 136 , 208 , 250,168 
8821 : 096,1 72,1 36,041 , 024,1 52,226 
8827 : 109 , 145 , 041 , 141 , 145 , 041,233 
8833 : 032,1 36,0 34,1 36 , 208 , 250,1 57 
8839 : 096 , 169 , 013,0 32 , 168,031 ,1 32 
8845 : 173 , 110 , 045 , 240 , 003 , 032,232 
8851 : 1 68,031 , 096,1 41 ,1 47,041 ,003 

8857 : 041 , 127 , 032 , 133 , 031,1 74,179 
8863 : 225 , 034,221 , 225 , 034 , 240,1 1 4 
8869 : 009 , 202 , 208 , 248 , 206 , 144,158 
8875 : 041 , 076,24 2 , 035 , 202,1 38,1 37 
8881 sOlO , 170 , 140 , 146 , 041 , 169,085 
8887 : 034 , 072 , 169 , 196 , 072 , 189,147 

889 3 : 245 , 034 , 072,1 89 , 244 , 034,239 
8899 : 072 , 096,0 56,1 73,1 46,041 ,01 1 

890 5 : 1 01 ,251 ,1 33,251 ,1 65,2 52,074 

8911 : 105 , 000 , 133 , 252 , 076 , 238,243 

891 7 : 032,1 77,251 ,201 ,031 , 240,1 21 

892 3 : 001 ,1 36,1 40,1 46,041 , 096,01 1 

892 9 : 01 8 , 087 , 065 , 076 , 082 , 084,1 25 

893 5 : 066 , 083,0 78 , 072 , 070 , 064,1 52 

8941 : 0 80 , 063 , 088 , 077 , 073,071 ,1 77 

894 7 : 0 74,0 84 , 035,1 02 , 035,1 1 1 ,1 72 
89 53 : 035 , 121 , 035 , 131 , 035 , 141 , 235 
8959 : 0 35,1 51 , 035,1 61 , 035,1 76,080 
896 5 : 035,21 0 , 035 , 058 , 035 , 074,1 96 
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8971 : 035 , 042 , 035 , 032 , 035 , 023,213 

8977 : 0 35 , 235 , 035 , 020 , 036 , 093,21 5 
8983 : 0 35 , 200,1 69 , 000,1 41 ,1 43,1 99 
8989 : 041 , 076,21 4,0 34 , 200 , 032,1 1 4 
8995 : 099 , 030,1 41 ,1 42,041 , 076,052 
9001 : 21 4 , 034 , 200 , 032 , 099 , 030,1 38 
9007 : 1 41 ,1 40,041 ,1 73,1 1 8,041 ,1 89 
9013 : 141 , 141 , 041 , 076 , 214 , 034 , 188 

901 9 : 200 , 032 , 099 , 030,1 41 ,1 38,1 87 

902 5 :041 ,1 73,1 1 8,041 ,1 41 ,1 39,206 

90 31 : 041 , 076,21 4 , 034 , 200 , 032,1 56 
90 37 : 099 , 030,1 41 ,1 33,041 , 076,085 
904 3 : 21 4 , 034,1 69 , 000,1 41 ,1 37,01 0 
904 9 : 041 , 200 , 076,21 4 , 034,1 69,055 
90 55 : 01 0,1 41 ,1 1 0 , 045 , 200 , 076,1 65 
9061 : 21 4 , 034 , 200 , 169,001 , 141,092 

9067 : 150 , 041 , 076 , 214 , 034 , 200,054 

9073 : 032 , 099 , 030,1 41 ,1 31 ,041 ,075 

90 79 : 076,21 4 , 034 , 200 , 032 , 099,006 

9085 : 030,1 41 ,1 32,041 , 076,21 4,247 
9091 : 034 , 200 , 032 , 099,0 30,1 41 ,1 55 

9097 : 134 , 041 , 076 , 214 , 034 , 200,068 
9103 : 032 , 099 , 030,1 41 ,1 35,041 ,1 09 

91 09 : 076,21 4 , 034 , 200,0 32 , 099,036 

9115 : 030 , 141 , 136 , 041 , 076 , 214,025 
91 21 : 0 34,1 72,1 4 6,041 , 200,1 52,1 38 

91 27 : 072,0 32,1 99,0 33,1 04,1 68,00 7 
9133 : 140 , 146 , 041 , 096 , 032 , 203,063 
9139 : 035 , 136 , 140 , 129 , 041 , 160,052 
91 4 5 : 001 ,1 77,251 ,1 53,1 08 , 043,1 50 
91 51 : 200 , 204,1 2 9,041 ,1 4 4 , 245,1 30 

91 57 : 240 , 243 , 200 , 076,21 4 , 034,1 80 
91 63 : 200,1 77,2 51 ,201 ,031 ,20 8,24 7 
91 69 : 249 , 096 , 032 , 203,0 35,1 36,1 92 
91 75 :1 40,1 30,041 ,1 60,001 ,1 77,096 
91 81 : 251 ,1 53,1 09 , 044 , 200 , 204,1 58 

9187 : 130 , 041 , 144 , 245 , 240 , 243 , 246 
9193 : 076 , 214 , 034 , 032 , 203 , 035,059 

91 99 : 076,21 4 , 034 , 200,1 77,2 51 ,1 67 

92 05 : 201 ,061 , 240 , 007,1 36,1 73,039 
9211 : 147 , 041 , 076 , 009 , 033 , 200,245 

921 7 : 032,0 99,0 30 , 072,1 73,1 47,042 
92 23 : 041 ,041 ,1 2 7,1 70,1 04,1 57,1 35 

922 9 : 237,041 , 032,21 4 , 034 , 076,1 35 

9235 : 197 , 034 , 200 , 162 , 008 , 177,029 
92 41 :251 ,041 , 063,201 , 004 , 240,0 57 
924 7 : 009,1 62,001 ,201 , 020 , 240,1 52 
92 53 : 003 , 076 , 233,031 ,1 42,1 47,1 57 
92 59 : 028 , 200,1 77,251 ,201 , 058,1 90 
926 5 : 240 , 003 , 076 , 233,0 31 , 200,064 
9271 :1 77,251 ,201 ,031 , 240,00 9,1 96 

9277 : 032,1 33,031 ,1 53 , 085,041 ,024 
92 83 : 0 76 , 054 , 036,1 52,0 56 , 233,1 62 
92 89 : 003,1 62 , 088,1 60,041 , 032,047 
9295 : 189 , 255 , 032 , 204 , 255 , 169,159 
9301 : 002 , 032,1 95,2 55,1 69 , 002,228 



930 7 : 1 74,1 47,02 8,1 60 , 000 , 032,1 20 

931 3 : 1 86 , 255 , 032 , 050,01 9,1 69,040 

931 9 : 000 , 166 , 057 , 164 , 058 , 032,068 
93 25 : 21 3 , 255,1 44,00 3 , 076 , 233,009 
93 31 :031 ,1 42 , 002,041 ,1 40 , 003,21 8 
93 37 : 041 ,1 04,1 04,1 62,001 , 032,053 
934 3 : 201 , 255 , 076 , 228 , 032 , 032,1 83 
9349 : 231 , 255 , 169 , 000 , 032,1 89,241 
9355 : 255,1 69,01 5,1 62,00 8,1 60,1 40 
93 61 : 01 5,0 32,1 86 , 255 , 032,1 92,089 
93 67 : 255,1 44,01 1 ,1 69,01 5 , 032,009 
9373 : 1 95 , 255 , 032,231 , 255 , 076,1 77 
9379 : 234 , 019 , 032 , 250 , 019 , 169 , 118 
9385 : 055 , 160 , 040 , 032 , 108 , 019,071 
93 91 : 032,1 99 , 027 , 240 , 022,1 62,089 

93 97 : 01 5 , 032,201 ,2 55,1 76 , 223,059 

9403 : 169 , 048 , 160 , 041 , 032 , 108,233 
9409 : 01 9,1 69,01 3 , 032,21 0,2 55,1 23 
941 5 : 032 , 204 , 255,0 32,231 , 255,1 84 
9421 :1 69 , 000 , 032,1 89 , 255,1 69,251 

9427 : 01 5,1 62 , 008,1 60,01 5 , 032,091 
9433 : 1 86,2 55 , 032,1 92,2 55,1 76,033 

94 39 :1 86 , 032 , 250,01 9,1 62,01 5,1 1 9 

94 4 5 : 0 32,1 98 , 255 , 032,1 99 , 027,204 
94 51 : 0 32 , 204 , 255,1 69,01 5 , 032,1 74 

9457 : 195 , 255 , 032 , 231 , 255 , 169,098 
94 63 : 001 ,1 41 , 254 , 040 , 096 , 032,043 
9469 : 036 , 037,1 73,1 55,041 , 240,1 67 
94 75 : 022,0 32,1 99,0 37,0 32 , 074,1 43 
94 81 : 037,1 73,1 53,041 ,201 , 255,1 01 

94 87 : 240 , 009,0 32 , 234,0 37 , 032,087 
9493 : 158 , 018 , 076 , 007 , 037 , 076,137 
94 99 : 234,01 9,1 73,1 41 , 002,201 ,029 
9505 : 005 , 208 , 038,0 32 , 250,01 9,073 
9511 : 169 , 209 , 160 , 040 , 032 , 108,245 

9517 : 01 9 , 032 , 199 , 027 , 141,1 55,1 06 
952 3 : 041 , 208 , 003 , 076 , 234,01 9,1 20 
9529 : 160 , 000 , 185 , 048 , 041 , 153,132 
9535 : 156 , 041 , 200 , 204 , 005 , 041,198 
9541 : 208 , 244 , 076 , 234,01 9,1 65,247 

9547 : 057 , 133 , 251 , 165 , 058 , 133,104 
9553 : 252,1 69 , 255,1 41 ,1 53,041 ,068 
9559 : 160 , 001 , 162 , 000 , 173 , 155,226 
9565 :041 , 240 , 080,1 89,1 56,041 ,072 
9571 : 0 32 , 026 , 020 , 209,251 , 240,1 09 
9577 : 002,1 62,2 55 , 200 , 208,01 1 ,1 75 
9583 : 230 , 252,1 65,2 52 , 205 , 003,1 94 
9589 : 041 , 240 , 002,1 76 , 054 , 232,094 
9595 : 236,1 55,041 ,20 8 , 224 , 024,24 3 
9601 :1 52,1 01 ,2 51 ,1 33,0 59,1 65,222 

9607 : 252,1 05 , 000,1 3 3 , 060,1 73,090 
961 3 : 002,041 ,1 97 , 059,1 73 , 003,1 04 

961 9 : 041 , 229 , 060,1 44,0 24 , 056,1 89 

962 5 : 1 65 , 059 , 237,1 55,041 ,1 33,1 75 
9631 : 057 , 141 , 152 , 041 , 165 , 060,007 
96 37 : 233 , 000,1 33 , 058,1 41 ,1 53,1 1 5 


964 3 : 041 , 032,1 34,021 , 096 , 032,01 5 
9649 : 250 , 019 , 169 , 219 , 160 , 040,010 
9655 : 032 , 108 , 019 , 169 , 001 , 141,141 
9661 -. 254 , 040 , 096,1 73,1 41 , 002,1 27 
9667 : 201 , 005 , 208 , 035,0 32 , 250,1 58 
96 73 : 01 9,1 69 , 229,1 60 , 040 , 032,082 
96 79 : 1 0 8 , 019 , 032,1 99 , 027 , 141,221 
9685 : 196 , 041 , 240 , 014 , 160 , 000,096 
96 91 :1 85 , 048,041 ,1 53,1 97,041 ,1 1 6 
9697 : 200 , 204 , 005,041 , 208 , 244,1 03 

970 3 : 0 76 , 234,01 9,0 56,1 65 , 057,070 
9709 : 133 , 158 , 237 , 152 , 041 , 133,067 

971 5 : 0 59,1 65 , 058,1 33,1 59 , 237,030 
9721 : 153 , 041 , 005 , 059 , 208 , 101,048 
9727 :1 69 , 255 , 141,1 53 , 041 , 024,014 
9733 : 1 73,1 55,041 , 1 01 , 057,1 33,1 53 

973 9 : 0 38,1 69 , 000,101 , 058,1 33,254 

974 5 : 039 , 056,1 73,00 2,041 ,22 9,04 5 
9751 : 158 , 133 , 180 , 173 , 003 , 041,199 
9757 : 229,1 59,1 33,1 81 , 032 , 035,030 
976 3 : 01 8 , 056,1 73 , 002,041 , 237,050 
9769 : 155 , 041 , 141 , 002 , 041 , 173,082 
9775 : 00 3,041 , 233 , 000,1 41 ,00 3,21 2 
9781 : 041 ,1 73,1 96,041 , 240,041 ,01 7 
9787 :1 41 ,1 48,041 ,1 69 , 000,1 41 ,1 87 
9793 : 149 , 041 , 032 , 037 , 026 , 160,254 
9799 : 000,1 85,1 97,041 , 032 , 026,040 

980 5 : 020,1 4 5 , 057 , 200,20 4,1 96,1 31 

981 1 : 041 , 208 , 242 , 024,1 65 , 057,052 

9817 s 109 , 196 , 041 , 133 , 057 , 165,022 

982 3 : 058,1 05 , 000,1 33 , 058 , 076,01 3 
9829 : 1 34,021 , 1 60 , 000 , 204 , 000,1 08 

983 5 : 041 , 240,0 32,1 77,2 53,04 8,1 30 
9841 : 029 , 032 , 133 , 031 , 032 , 252,1 10 
9847 : 038 , 032 , 168 , 031 , 173 , 151,200 
9853 : 041 , 240 , 010 , 169 , 008 , 032,113 
9859 :1 68,031 ,1 69 , 095 , 032,1 68,026 
9865 : 031 , 200 , 076 , 105 , 038 , 096,171 
9871 : 1 40,1 46,041 ,041 , 1 27,1 41 ,01 1 
9877 ; 147 , 041 , 032 , 133 , 031 , 201,222 
98 83 : 067 , 208 , 027,0 56,1 73 , 142,060 
9889 : 041 , 237 , 000,041 , 074,0 56,098 
9895 : 237 , 131 , 041 , 168 , 169 , 032,177 
9901 : 032 , 168 , 031 , 136 , 208 , 250,230 
990 7 :1 72,1 46,041 , 076,1 38 , 038,02 2 
9913 : 201 , 069 , 208 , 017 , 056 , 173,141 
9919 : 132 , 041 , 237 , 000 , 041 , 056 , 186 
992 5 : 237,1 31 ,041 , 1 68,1 69 , 032,207 
9931 : 076,1 73 , 038,201 , 085 , 208,21 6 
9937 : 008,1 73,1 51 , 041 , 073,001 , 1 44 
994 3 : 1 41 ,1 51 ,041 ,201 ,03 5 , 208,224 
9949 : 01 8,1 40 , 146 , 041 , 174 , 138,110 
9955 : 041 ,1 73,1 39,041 , 032 , 205,090 
9961 : 221 ,1 72,1 46,041 , 076,1 38,003 
996 7 : 038,1 74,1 47,041 ,1 89,2 3 7,041 
9973 : 041 , 032 , 168 , 031 , 076 , 138,219 
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9979 : 038,1 74,1 50,041 , 240 , 026,1 52 
9985 : 133 , 059 , 041 , 127 , 201 , 065,115 
9991 : 1 4 4,01 8 , 201 , 091 , 1 76 , 014,139 

9997 : 1 70 , 165 , 059 , 041 , 128 , 073,137 
10003 : 128 , 074 , 074 , 133 , 059 , 138,113 
10009 : 005 , 059 , 096 , 032 , 250 , 019,230 
10015 : 056 , 173 , 245 , 040 , 237 , 002 , 016 
10021 : 041 , 170 , 173 , 246 , 040 , 237,176 
1 0027 : 003,041 , 032 , 205,221 ,1 69,202 

100 33 : 001 , 141 , 254 , 040 , 096 , 008,077 

10039 : 01 4 , 211 , 080 , 069 , 069 , 068,054 
10045 : 21 1 , 067 , 082 , 073,0 80 , 084,146 
1 00 51 : 0 32,0 51 ,04 6,04 8 , 000,01 3,001 

1 00 57 : 01 8 , 066 , 089 , 032,1 95 , 072,033 
1 0063 : 065 , 082 , 076 , 069 , 083,0 32,230 
1 0069 : 1 94,0 82 , 065 , 078 , 078 , 079,1 49 
10075 : 078 , 000,1 94 , 085 , 070 , 070,076 
10081 : 069 , 082 , 032 , 195 , 076 , 069,108 

1 00 87 : 065 , 082 , 069 , 068 , 000,1 94,069 
10093 : 085 , 070 , 070 , 069 , 082 , 032,005 
10099 : 198 , 085 , 076 , 076 , 000 , 196,234 
1 01 05 : 069 , 076,0 69,0 84 , 069,0 32 , 008 
10111 : 040,21 1 , 044,21 5 , 044,20 8,1 21 

101 17 : 041 , 000 , 058 , 032,21 1 , 085,048 

101 23 : 082 , 069 , 063 , 032,21 7 , 047,1 37 
1 01 29 : 206,0 58 , 000,1 97,21 0,1 93,241 
1 01 35 : 21 1 ,1 97 , 032,1 93 , 204 , 204,1 68 
1 01 41 : 000,1 97 , 082 , 065 , 083 , 069,1 41 
1 01 47 : 032 , 040,21 1 , 044,21 5 , 044,237 
1 01 53 : 208 , 041,01 3,01 8 , 208 , 082,227 
1 01 59 : 069 , 083,0 83,0 32,1 46,21 0,030 
10165 : 197 , 212 , 213 , 210 , 206 , 018,213 
10171 : 032 , 084 , 079 , 032 , 069 , 088,059 
1 01 77 : 073,0 84 , 000 , 208,0 82 , 069,1 97 
1 01 83 : 0 83 , 083,0 32 , 070 , 079 , 082,1 1 6 

10189 : 077 , 065 , 084 , 032 , 075 , 069,095 
10195 : 089 , 058 , 000 , 211 , 065 , 086,208 
1 0201 : 069 , 058 , 000,21 2 , 065 , 080,1 89 
1 0207 : 069,0 32 , 197 , 210 , 210 , 207,1 24 
10213 : 210 , 000 , 211 , 084 , 079 , 080,125 
10219 : 080 , 069 , 068 , 000 , 214 , 069,223 
10225 : 082 , 073 , 070 , 089 , 032,1 97,01 6 
1 0231 : 082 , 082 , 079 , 082 , 000 , 206,01 0 
10237 : 079 , 032 , 069 , 082 , 082 , 079,164 
10243 : 082 , 083 , 000 , 147 , 032 , 018,109 
1 0249 : 21 2,1 46 , 065 , 080 , 069 , 032,1 01 
10255 : 079 , 082 , 032 , 018 , 196 , 146,056 
10261 : 073 , 083 , 075 , 063 , 000 , 204,007 
1 0267 : 079 , 065 , 068 , 058 , 000,21 4,255 
10273 : 069 , 082 , 073 , 070 , 089 , 058,21 8 
10279 : 000 , 208 , 082 , 069 , 083 , 083,052 
10285 : 032 , 018 , 210 , 197 , 212 , 213,159 

102 91 : 21 0 , 206 , 146 , 000,1 96 , 073,1 14 
10297 : 083 , 075 , 032 , 067 , 079 , 077,214 
10303 : 077 , 065 , 078 , 068 , 058 , 000,153 
1 0 309 : 036 , 206 , 079 , 032,21 0 , 079,1 99 


10315 : 079 , 077 , 000 , 206 , 079 , 032,036 
1 0321 : 084 , 069 , 088 , 084,0 32 , 073,255 
10327 : 078 , 032 , 066 , 085 , 070 , 070,232 
10333 : 069 , 082 , 046 , 000,1 47,01 8,199 
10339 : 21 1 , 146 , 067,0 82 , 069 , 069,231 
10345 : 078 , 044 , 032 , 018 , 196 , 146,107 
10351 : 073 , 083 , 075 , 044 , 032,01 8,1 80 
10357 : 208 , 146 , 082 , 073 , 078 , 084,020 
10363 : 069 , 082 , 063 , 000 , 196 , 069,090 
10369 : 086 , 073 , 067 , 069 , 032 , 078,022 
10375 : 085 , 077 , 066 , 069 , 082 , 063,065 
10381 : 000 , 211 , 069 , 067 , 079 , 078,133 
10387 : 068 , 065 , 082 , 089 , 032 , 193,164 
10393 : 068 , 068 , 082 , 069 , 083 , 083,094 
1 0399 : 0 32,0 35 , 063 , 000,1 98 , 073,04 8 
1 0405 : 076 , 069 , 078 , 065 , 077 , 069,087 
10411 : 058 , 000 , 147 , 208 , 082 , 073,227 
10417 : 078 , 084 , 073 , 078 , 071 , 046,095 
10423 : 046 , 046,01 3,01 3 , 000 , 206,251 
10429 : 069 , 088 , 084 , 032 , 083 , 072,105 
10435 : 069 , 069 , 084 , 044 , 032 , 146,127 
1 0441 : 21 0,1 97,21 2,21 3,21 0 , 206,169 
10447 : 01 8 , 000 , 200 , 085 , 078 , 084,160 
1 04 53 : 032 , 070 , 079,0 82,0 58 , 000,022 
1 04 59 : 206 , 079 , 084 , 032,1 98 , 079,1 29 
10465 : 085 , 078 , 068 , 000 , 210 , 069,223 
10471 : 080 , 076 , 065 , 067 , 069 , 058,134 
10477 : 000 , 209,21 3,201 ,21 2 , 000 , 048 
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VOGLIATE SPEDIRMI 


Judy Tatchell - Bill Bennett 


Il libro, parla di giochi con il compu¬ 
ter, una volta tanto visti dalla parte 
del computer, e non dell'utente. 

In particolare spiega, in modo sem¬ 
plice ma preciso, come fa il compu¬ 
ter a giocare, come ta a produrre im¬ 
magini e suoni durante il gioco e co¬ 
me fa (in genere!) a vincere. 

Coi. 0060 Pag. 48 Lire 9.000 


Brian Reffin Smith 

IMPARIAMO 
A PROGRAMMARE 


fan Graham 

GIOCHI CON 
IL COMPUTER 


Il libro fornisce le conoscenze essen¬ 
ziali per incominciare a programmare 
in BASIC su di un personal com¬ 
puter. 

Cod. 0180 Pag. 48 Lire 9.000 


PRIMI PASSI 
IN BASIC 

Il libro propone l'apprendimento del 
linguaggio BASIC tramite lo studio e 
l'esame dettagliato di programmi già 
scritti. 

Cod. 0070 Pag. 48 Lire 9.000 

Tony Potter - Ivor Guild 

I ROBOT 


CONOSCERE 
IL PERSONAL 

Il libro spiega che cosa si può fare 
con un personaPcomputer, come si 
usa e come funziona. 

Cod. 0080 Pag. 48 Lire 9.000 

Lynn Miring - fan Graham 

RIVOLUZIONE 

INFORMATICA 

Il volume è rivolto in particolare ai 
bambini, ma anche a tutti coloro 
che. presto o tardi, verranno coinvol¬ 
ti dalle nuove tecniche informatiche 
più come utenti che come operatori. 
Cod. 0040 Pag. 48 Lire 9.000 
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Dopo una rapida panoramica su che 
cosa può fare un robot, il libro pre¬ 
senta una serie di robot con funzioni 
particolari: i robot a braccio, i robot 
operai, i robot nello spazio, etc. 
Affronta poi il problema di come un 
robot può essere programmato e 
controllato da un computer, e di co¬ 
me praticamente si realizza un robot. 

Cod. 003D Pag. 48 Lire 9.000 
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di J. Kranse 

trad. ed adatt. 

di S. Colombo 




Cercate di surclassare il vostro 
VIC 20 in qnesto veloce pro¬ 
gramma malti-livello, le cui rou¬ 
tine “intelligenti” sono scritte 
interagente in linguaggio nac- 
china. E richiesto l’uso di un joy¬ 
stick e di un’espansione di me¬ 
moria da almeno 8 Kbyte. 


T utto il mondo era stupito, alla fine 
del diciottesimo secolo, da una mac¬ 
china dotata della straordinaria capaci¬ 
tà di giocare a scacchi contro un avver¬ 
sario umano. La macchina venne porta¬ 
ta al cospetto di Re e Regine e sconfisse 
Napoleone, uno dei maggiori strateghi 
dell’epoca. 

Centinaia di persone si prenotavano per 
giocare, dietro pagamento di una salata 
tariffa, contro la macchina, e solo dopo 
anni ed anni si scoprì l’inganno: all’inter¬ 
no della macchina si nascondeva un na¬ 
no dotato di una straordinaria abilità 
scacchistica. 

In realtà, la macchina per giocare a 
scacchi rimase un sogno fino ai tardi 
anni ’50, quando venne giocata la pri¬ 
ma partita contro un computer. Al gior¬ 
no d’oggi, invece, esistono addirittura i 
campionati mondiali di scacchi per com¬ 
puter che si svolgono ogni tre anni, a 
partire dal 1974. 

Ma perché c’è qualcosa di così straordi¬ 
nario nelle macchine che giocano a 
scacchi? In primo luogo perché il gioco 
degli scacchi può essere usato per misu¬ 
rare Pintelligenza” del computer: gli 
scacchi sono infatti uno dei giochi con 
il più alto contenuto di strategia, così 
alto che molti esperti credono che per 
poter diventare campione del mondo un 
computer debba essere almeno tanto 
intelligente quanto un essere umano. 
Un altro motivo è che giocare a scacchi 
è molto divertente ed appagante, ma 
non sempre si è in grado di avere sotto¬ 
mano un avversario. L’avversario elet¬ 
tronico, il computer con il suo program¬ 
ma, deve possedere quindi doti di velo¬ 
cità, facilità d’uso e possibilità di gioca¬ 
re a diversi livelli di difficoltà. 

Il programma qui presentato possiede 


tutte queste caratteristiche, insieme ad 
altre ancora più particolari. Benché • 
ovviamente - non possa reggere il con¬ 
fronto con i migliori programmi com¬ 
merciali di scacchi, rappresenterà un 
avversario instancabile, che vi permet¬ 
terà di passare ore piacevoli ed intelli¬ 
genti con il vostro computer. 

Dopo aver mandato in esecuzione il 
programma vi verranno proposte diver¬ 
se opzioni di gioco: potrete scegliere fi¬ 
no a cinque diversi livelli di difficoltà, 
selezionare una nuova partita oppure 
disporre inizialmente i pezzi come me¬ 
glio desiderate, giocare contro il compu¬ 
ter oppure osservarlo mentre gioca con¬ 


tro se stesso. È inoltre possibile sceglie¬ 
re se tenere i pezzi bianchi oppure i 
pezzi neri. 

Per il momento selezionate la prima op¬ 
zione ad ogni domanda: ciò vi pone al 
primo livello, con i pezzi bianchi, ad ini¬ 
ziare una nuova partita contro il compu¬ 
ter. 

La prima volta che il programma viene 
mandato in esecuzione occorre attende¬ 
re alcuni secondi, per il tempo necessa¬ 
rio all’inizializzazione del “cervello” del 
computer. Verrà quindi visualizzata la 
scacchiera con i vostri pezzi disposti 
verso il basso e quelli del computer nel¬ 
la parte alta. Noterete una cornice lam- 
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peggiante che racchiude la casella nel¬ 
l'angolo inferiore sinistro della scacchie¬ 
ra: è il cursore, che vi permette di co¬ 
municare al computer quali pezzi inten¬ 
dete muovere e dove. 

Con il joystick potete portare il cursore 
sopra il pezzo che desiderate muovere. 
Premete quindi il pulsante di fuoco e 
spostate il cursore sulla casella che do¬ 
vrà occupare il pezzo selezionato. Pre¬ 
mendo ancora il pulsante di fuoco si 
otterrà la mossa del pezzo selezionato 
nella casella desiderata. Il computer ri¬ 
sponderà in modo pressoché istantaneo 
con la sua mossa. 

Vi accorgete di aver effettuato una mos¬ 
sa sbagliata? Nessun problema! Una 
delle migliori caratteristiche di questo 
programma è la possibilità di modificare 
la situazione sulla scacchiera tramite 
l’aggiunta o l’eliminazione dei pezzi. Un 
pezzo può essere eliminato posizionan¬ 
dovi sopra il cursore e premendo la bar¬ 
ra spaziatrice. Per aggiungere invece un 
pezzo muovete il cursore sulla casella 
su cui volete far apparire il pezzo stes¬ 
so, e premete rispettivamente: 

P per un pedone 
N per un cavallo 
B per un alfiere 
R per una torre 
Q per una regina 
K per un re 

Questa operazione farà comparire il 
pezzo selezionato, con il vostro colore, 
nella casella. Per aggiungere invece uno 
dei pezzi del computer tenete premuto 
il tasto SHIFT mentre premete uno dei 
tasti di cui sopra. 

Per ripetere una mossa errata potete 
utilizzare questo sistema per riportare 
la situazione alla configurazione prece¬ 
dente la mossa errata, non dimentican¬ 
do di annullare anche la mossa che sarà 
nel frattempo stata effettuata dal com¬ 
puter. Questa caratteristica permette 
inoltre di effettuare manovre che non 
potrebbero essere portate a termine 
con il semplice uso del joystick, come 
la presa di un pedone “en passant”, o 
l’arrocco. Per esempio, l’arrocco può 
essere effettuato eliminando il Re e 
riaggiùngendolo quindi sulla sua nuova 
casella, poi muovendo la torre in modo 
normale nella casella che dovrà andare 
ad occupare. Benché voi siate in grado 
di effettuare queste operazioni, il com¬ 
puter al contrario non arroccherà mai, 
né catturerà un pedone “en passant”, 
dal momento che, a causa della loro 
complessità, queste routine non sono 
comprese nel programma. Anche se il 
computer effettuerà sempre delle mos¬ 
se regolamentari, non controllerà tutta¬ 
via la correttezza delle vostre: siete 
dunque liberi di muovere qualsiasi pez¬ 
zo in qualunque posizione della scac¬ 
chiera. Se siete giocatori smaliziati, ciò 
non costituirà certamente un problema. 
Se al contrario siete dei principianti, vi 
converrà dapprima familiarizzarvi con 
le regole del gioco degli scacchi, onde 


evitare di giocare partite del tutto 
strampalate. 

Quando un Pedone raggiunge il bordo 
opposto della scacchiera, viene auto¬ 
maticamente trasformato in Regina. Se 
desiderate invece avere un Alfiere, una 
Torre, o un qualsiasi altro pezzo, potre¬ 
te facilmente sostituirlo con il sistema 
precedentemente spiegato. 

Il computer gioca analizzando migliaia 
di mosse e contromosse possibili e sele¬ 
zionando quella che viene reputata co¬ 
me la migliore in base al valore relativo 
assegnato ai vari pezzi. Molte configura¬ 
zioni non sono caratterizzate da un’uni¬ 
ca mossa migliore delle altre possibili, 
ma da una serie di mosse strategica¬ 
mente equivalenti: in questo caso il 
computer sceglierà casualmente la mos¬ 
sa tra quelle a “pari punteggio”. 
Questo fattore di casualità assicura che 
ogni partita sia sempre diversa dalle al¬ 
tre e rende il gioco più divertente ed 
emozionante. 

La partita ha termine quando uno dei 
giocatori viene posto in condizione di 
scacco matto oppure di stallo. In queste 
condizioni il computer indicherà quale 
dei due giocatori è da considerarsi come 
vincitore. 

Ci sono alcune caratteristiche interes¬ 
santi nel modo in cui il computer deter¬ 
mina una situazione di scacco matto: 
nei livelli da tre a cinque lo scacco mat¬ 
to viene annunciato “prematuramen¬ 
te”. Quando ciò accade il computer ha 
infatti determinato che è assolutamente 
impossìbile evitare il matto nella mossa 
successiva - o nelle due successive - po¬ 
sto che entrambe le parti giochino al 
meglio. 

Inoltre, il computer non è in grado di 
riconoscere la sottile differenza tra lo 
scacco matto e lo stallo: quando que¬ 
st’ultimo si verifica, il computer lo di¬ 
chiarerà come un matto. A causa di 
questa limitazione, per cui il computer 
non distingue tra scacco matto e stallo, 
e dal momento che esso cerca il più 
possibile di dare lo scacco matto all’av¬ 
versario, cercherà anche - quando pos¬ 
sibile • di creare una condizione di stallo. 
Fortunatamente ciò accadrà piuttosto 
raramente, dal momento che le condi¬ 
zioni per uno stallo si verificano soltanto 
in situazioni insolite e fuori dal comune. 
Inoltre, il computer non vi comunicherà 
di aver messo sotto scacco il vostro Re: 
siate quindi accorti nelle vostre mosse, 
e controllate sempre che il vostro Re 
non si trovi sotto scacco da parte di 
qualche pezzo del computer. In caso 
contrario il vostro Re si troverà sotto 
scacco durante il turno di mossa del 
computer: una situazione senz’altro al 
di fuori di ogni regola, che porterà a 
una risposta del tutto impropria da par¬ 
te del computer: nella maggior parte 
dei casi annuncerà lo scacco matto, ob¬ 
bligandovi ad abbandonare la partita. 
Dopo che il computer ha annunciato lo 
scacco matto potrete iniziare una nuova 
partita, premendo il pulsante di fuoco 
sul joystick. Se desiderate invece modi¬ 


ficare qualcuna delle scelte iniziali, co¬ 
me il livello di gioco, premete RUN/ 
STOP e RESTORE e date nuovamente 
il RUN al programma. 

Opzioni di gioco 

Quando selezionate i pezzi neri la scac¬ 
chiera si inverte, in modo che possiate 
comunque avere i vostri pezzi nella sua 
parte bassa. Dal momento che la prima 
mossa tocca sempre al bianco, dovrete 
attendere in questo caso che il compu¬ 
ter effettui la sua prima mossa. 
Selezionando invece il gioco automatico 
del computer contro se stesso, potrete 
mettere da parte il joystick e godervi 
una buona partita di scacchi in TV: i 
principianti trarranno molti vantaggi da 
questa opzione, potendo vedere come 
muovono i vari pezzi ed acquisendo un 
minimo di strategia. 

Non siete obbligati ad iniziare una parti¬ 
ta con tutti i pezzi nella posizione stan¬ 
dard: se selezionate l’opzione che vi 
permette di disporre i pezzi come vole¬ 
te, potrete risolvere i tipici problemi 
scacchistici, come il matto in tre mosse 
e così via. Con questa opzione i pezzi 
vengono disposti sulla scacchiera usan¬ 
do i tasti descritti precedentemente. La 
prima mossa toccherà in questo caso 
sempre a voi. 

Uno dei vantaggi del computer rispetto 
a un avversario umano è la possibilità 
di “regolarlo” su un livello di abilità 
scacchistica consono al vostro. La diffe¬ 
renza tra i vari livelli di difficoltà dispo¬ 
nibili sta nel grado di approfondimento 
dell’indagine strategica effettuata dal 
computer: mentre nel livello uno esso 
analizza solo la propria mossa e la vo¬ 
stra possibile risposta, ai livelli successi¬ 
vi la sua indagine si spinge su un nume¬ 
ro di mosse e contromosse sempre più 
elevato. 

La maggiore abilità del computer ai li¬ 
velli più alti ha comunque un prezzo: il 
tempo di attesa per la sua mossa. Men¬ 
tre al livello uno il computer muove in 
meno di un secondo, al livello cinque gli 
sono mediamente necessarie due ore 
per ogni mossa. Ecco un riassunto delle 
caratteristiche dei vari livelli di gioco: 
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Livello 1: principiante. 

Tempo di attesa: 1 secondo circa 
Numero di mosse esaminate: 2 

Livello 2: intermedio/basso 
Tempo di attesa: 5 secondi circa 
Numero di mosse esaminate: 3 

Livello 3: intermedio/alto 
Tempo di attesa: 2 minuti circa 
Numero di mosse esaminate: 4 
Nota: dal momento che il limite general¬ 
mente adottato nei tornei è di 40 mosse 
in due ore (una media di tre minuti per 
mossa), questo livello può essere assun¬ 
to come standard. 

Livello 4: esperto 
Tempo di attesa: 30 minuti circa 
Numero di mosse esaminate: 5 
Nota: l'utilizzo di questo livello è consi¬ 
gliato per la risoluzione di problemi 
scacchistici. 

Livello 5: partite postali 
Tempo di attesa: 2 ore circa 
Numero di mosse esaminate: 6 

1 tempi di risposta sopra citati sono va¬ 
lori medi; il tempo effettivo può variare, 
a seconda delle circostanze, dalla metà 
al doppio di quanto indicato. 

Come il prograoaa “pensa” 

Avrete probabilmente sentito dire che 
se una scimmia si sedesse davanti ad 
una macchina per scrivere e pestasse a 
caso sui tasti per un periodo di tempo 
sufficientemente lungo, potrebbe per 
puro caso scrivere l’intera opera di Sha¬ 
kespeare. A livello puramente teorico, 
ciò è possibile. Probabilisticamente par¬ 
lando, tuttavia, con una velocità di batti¬ 
tura di 50 parole al minuto ci vorrebbe¬ 
ro per la povera scimmietta un paio di 
milioni di anni solo per scrivere “Essere 


o non essere”... 

Sostituite ora la scimmietta con un velo¬ 
cissimo computer, e questa tecnica può 
diventare un buon metodo per simulare 
l’intelligenza umana. 

Il programma qui presentato utilizza in¬ 
fatti un algoritmo basato sulla cosiddet¬ 
ta tecnica “minimax”: il computer legge 
la posizione corrente sulla scacchiera e 
mentalmente muove i vari pezzi in tutte 
le possibili combinazioni di mosse e con¬ 
tromosse future fino ad un certo punto 
(che, come visto, dipende dal livello di 
gioco selezionato). Per ogni possibile 
combinazione calcola un punteggio ba¬ 
sato sul tipo di pezzi eventualmente cat¬ 
turati durante la combinazione stessa. I 
punteggi che il computer assegna ai vari 
pezzi sono: 

1 punto per un pedone 
3 punti per un cavallo o un alfiere 
5 punti per una torre 
9 punti per la Regina 
46 punti per il Re 

Quando durante l’esame di una mossa 
il computer cattura un pezzo dell’avver¬ 
sario, il valore di quel pezzo viene ag¬ 
giunto al punteggio della mossa. Al con¬ 
trario, se il computer perde un pezzo, 
il valore di quel pezzo viene sottratto 
dal punteggio della mossa. Infine, un 
punteggio alto viene considerato buono 
per il computer, mentre un punteggio 
basso viene considerato buono per l’av¬ 
versario. Scopo del “ragionamento” del 
computer è trovare la combinazione 
che rappresenti il miglior gioco per en¬ 
trambe le parti. Questa combinazione 
non è necessariamente quella dotata 
del maggior punteggio, dal momento 
che mentre il computer cerca di massi¬ 
mizzare il proprio punteggio, l’avversa¬ 
rio al contrario cerca di minimizzarlo. 
La miglior combinazione è quindi quel¬ 


la che fornisce il massimo punteggio du¬ 
rante le mosse del computer ed il mini¬ 
mo punteggio durante le mosse dell’av¬ 
versario. 

Dopo che questa miglior combinazione 
è stata trovata la miglior mossa del 
computer nella posizione corrente sarà 
semplicemente la prima mossa della 
combinazione. Il problema è stato ridot¬ 
to, dall’analisi di una posizione degli 
scacchi, al trovare il massimo ed il mini¬ 
mo in una serie di numeri (cosa molto 
più agevole per un computer...). 

50 Milioni di combinazioni al 
livello 5 

Come molti altri algoritmi basati sullo 
stesso principio, anche quello usato da 
questo programma richiede al compu¬ 
ter di prendere in esame un numero 
enorme di combinazioni per trovare 
quale sia la migliore. Fortunatamente 
possono essere utilizzati alcuni espe¬ 
dienti per ridurre le combinazioni a un 
numero accettabile: una speciale tecni¬ 
ca di programmazione permette al com¬ 
puter di effettuare una ricerca intelli¬ 
gente, fornendogli la paradossale capa¬ 
cità di trovare la mossa migliore senza 
esaminare tutte le possibili combinazio¬ 
ni. Al livello 5, per esempio, invece di 
costringere il computer ad esaminare 2 
miliardi di combinazioni, si riesce a ri¬ 
durne il numero a “solo” 50 milioni. An¬ 
che con questo valore un programma 
in BASIC probabilmente finirebbe di ge¬ 
nerare le combinazioni soltanto nel 
1987. Ecco perché la parte del pro¬ 
gramma che si fa carico di compiere 
queste analisi è interamente in linguag¬ 
gio macchina e sfrutta una tecnica ricor¬ 
siva che la rende capace di analizzare 
5000 combinazioni al secondo: un buon 
compromesso tra abilità di gioco e tem¬ 
po di attesa per la scelta della mossa 
da parte del computer. 


Scacchi - programma 1 

5 POKE56,60 :POKE55,0:CLR : rem 171 

10 FORI = l 5449T016200 :READJ:POKEI,J:K = K+J: 

NEXT : rem 52 

20 IFK<>79727THENPRINT"ERRORE NELLE DATA! 

": END :rem 81 

30 POKE631 ,.l 3:POKE632,1 3:POKE633,1 3: POKEl 

98,3 : rem 79 

40 PRINT"{CLR}{ 3 GIU’jLOAD" :rem 27 

50 PRINT"{ 5 GIU’}RUN{HOME}" :rem 147 

55 POKE6656,0 :POKE44,26 : NEW :rem 85 

2000 DATA 21,12,248,237,235,244,8,19,10,1 
1 ,1,247,246,245,255 treno 126 

2010 DATA 9,11,247,245,9,10,1,246,255,46, 
9,5,3,3,1 : rem 138 

2020 DATA 0,1,3,3,5,9,46,120,169,192,141, 
1 28,63,162,0 : rem 23 

2030 DATA 142,127,63,202,142,126,63,76,97 
,61,189,108,63,24,125 :rem 244 

2040 DATA 116,63,72,168,185,136,63,188,10 
8,63,153,136,63,104,168 :rem 101 

2050 DATA 189,76,63,153,136,63,24,105,6,1 
68,174,73,63,169,0 :rem 109 
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2060 DATA 157,129,63,174,126,63,185,113,6 
0,56,253,129,63,168,169 :rem 108 

2070 DATA 192,157,129,63,152,224,0,208,34 
,221,128,63,48,28,208 :rem 243 

2080 DATA 11,173,20,145,205,127,63,144,18 
,141,127,63,140,128,63 :rem 19 

2090 DATA 173,108,63,141,124,63,173,116,6 
3,141,125,63,96,221,128 :rem 82 

2100 DATA 63,48,250,240,248,152,157,128,6 
3,189,75,63,24,105,6 :rem 199 

2110 DATA 168,185,113,60,56,253,128,63,22 
1,127,63,48,59,224,1 :rem 194 

2120 DATA 240,221,221,127,63,240,50,96,18 
9,108,63,24,125,116,63 :rem 23 

2130 DATA 141,75,63,168,185,136,63,172,74 
,63,208,6,201,1,16 :rem 92 

2140 DATA 192,48,8,201,0,48,186,201,7,240 
,182,157,76,63,201 :rem 88 

2150 DATA 6,240,4,201,250,208,12,169,46,1 
57,128,63,104,104,104 :rem 219 

2160 DATA 104,76,229,61,188,108,63,185,13 
6,63,172,75,63,153,136 :rem 55 

2170 DATA 63,188,108,63,169,0,153,136,63, 
236,73,63,208,3,76 :rem 108 




2180 DATA 144,60,232,142,126,63,169,20,15 
7,108,63,169,16,56,237 :rem 43 

2190 DATA 74,63,141,74,63,254,108,63,188, 
108,63,185,136,63,201 :rem 0 

2200 DATA 7,240,86,172,74,63,240,4,201,0, 
16,77,192,0,208 :rem 183 

2210 DATA 4,201,1,48,69,201,0,16,9,188,10 
8,63,169,0,56 :rem 91 

2220 DATA 249,136,63,201,1,208,6,32,5,62, 
76,222,61,201,2 :rem 175 

2230 DATA 208,6,32,192,62,76,222,61,201,3 
,208,6,32,218,62 :rem 234 

2240 DATA 76,222,61,201,4,208,6,32,230,62 
,76,222,61,201,5 :rem 223 

2250 DATA 208,6,32,242,62,76,222,61,32,47 
,63,76,222,61,189 :rem 47 

2260 DATA 103,63,201,98,48,150,224,0,240, 
16,169,16,56,237,74 :rem 146 

2270 DATA 63,141,74,63,202,142,126,63,76, 

144.60.173.124.63.24 :rem 186 

2280 DATA 109,125,63,141,125,63,88,96,173 

,74,63,208,89,1 89,1 08 : rem 20 

2290 DATA 63,24,105,10,168,185,136,63,208 
,36,169,10,157,116,63 :rem 247 

2300 DATA 32,21,61,189,108,63,201,31,48,2 

1.201.39.16.17.24 :rem 20 

2310 DATA 105,20,168,185,136,63,208,8,169 

,20,1 57,1 1 6,63,32,21 : rem 186 

2320 DATA 61 , 1 89.-1 08,63,24,1 05,9,1 68,1 85, 
136,63,16,8,169,9 :rem 65 

2330 DATA 157,116,63,32,21,61,189,108,63, 
24,105,11,168,185,136 :rem 240 

2340 DATA 63,16,8,169,11,157,116,63,32,21 
,61,96,189,108,63 :rem 53 

2350 DATA 56,233,10,168,185,136,63,208,36 
,169,246,157,116,63,32 :rem 50 

2360 DATA 21,61,189,108,63,201,81,48,21,2 
01,89,16,17,56,233 :rem 92 

2370 DATA 20,168,185,136,63,208,8,169,236 
,157,116,63,32,21,61 :rem 202 

2380 DATA 189,108,63,56,233,9,168,169,0,2 
17,136,63,16,8,169 :rem 122 

2390 DATA 247,157,116,63,32,21,61,189,108 
,63,56,233,11,168,169 :rem 2 

2400 DATA 0,217,136,63,16,8,169,245,157,1 
16,63,32,21,61,96 :rem 43 

2410 DATA 169,0,157,84,63,168,185,89,60,1 
57,116,63,32,21,61 :rem 108 

2420 DATA 254,84,63,188,84,63,192,8,48,23 
7,96,169,4,157,100 :rem 125 

2430 DATA 63,169,0,157,84,63,240,22,169,8 
,157,100,63,169,4 :rem 51 

2440 DATA 157,84,63,208,10,169,8,157,100, 
63,169,0,157,84,63 :rem 106 

2450 DATA 168,185,105,60,157,116,63,157,9 
2,63,32,21,61,189,108 :rem 255 

2460 DATA 63,24,125,116,63,168,185,136,63 
,208,13,189,116,63,24 :rem 253 

2470 DATA 125,92,63,157,116,63,76,6,63,25 
4,84,63,189,84,63 :rem 76 

2480 DATA 221,100,63,48,206,96,169,0,157, 
84,63,168,185,97,60 :rem 167 

2490 DATA 157,116,63,32,21,61,254,84,63,1 
88,84,63,192,8,48 :rem 68 

2500 DATA 237,96 : rem 24 

Scacchi - programma 2 

10 POKE36879,138:POKE36869,194 :rem 172 

20 PRINT"{CLR}{WHT}"TAB(8)"{GIU*} SCA 

{ 2 C}HI :rem 204 


30 PRINT"TGIU 1 }{CYN}{ 2 SPAZI}SUPERCOMMOD 
ORE : rem 246 

40 FORI=16256T016263:POKEI,192:NEXT 

:rem 109 

50 FORI=16264T016383:POKEI,7:NEXT 

: rem 11 

60 FORI = l6285T016362 : READJ:POKEI,J:NEXT 

: rem 191 

70 D$=" PNBRQKPNBRQK" :rem 236 

80 PRINT"{ 2 GIU'}{YELjLIVEfeLO (1-5)? 




: rem 

145 

90 GETA$:IFA$=""THEN90 

: rem 

245 

100 

IFVAL(A$)=0ORVAL(A$)>5THEN90 

: rem 

107 

no 

POKEI6201,VAL(A$) 

: rem 

128 

1 20 

PRINT"{GIU’}{RVS}1{OFF} NUOVO GIOCO 



: rem 

176 

1 30 

PRINT"{RVS}2{OFF} DEF.POSIZIONE 




: rem 

86 

1 40 

GETES:IFE$=""THENl40 

: rem 

85 

1 50 

IFVAL(E$)=0ORVAL(E$)>2THENl40 




: rem 

161 

1 60 

PRINT"{GIU 1 JCOMPUTER CONTRO 

: rem 

27 

1 70 

PRINT"{RVS}iTOFF} DI TE 

: rem 

66 

1 80 

PRINT"{RVS}2{OFF} SE STESSO 

: rem 

1 51 

1 90 

GETA$: IFA$ = ""THENl90 

: rem 

87 

200 

IFVAL(A$)=0ORVAL(A$)>2THENl 90 




: rem 

154 

210 

POKEI6202,0:B$="2":IFA$="2"THENPOKEl6 


2 0 2,1 6 : B$ = " 1 " :GOTO 2 70 

: rem 

151 

220 

PRINT"{GIU’}TU HAI I PEZZI 

: rem 

42 

230 

PRINT"{RVS}iTOFF} BIANCHI 

: rem 

7 

240 

PRINT"{RVS}2{OFF} NERI 

: rem 

73 

250 

GETB$:IFB$=""THEN250 

: rem 

83 

260 

IFVAL(BS)=0ORVAL(B$)>2THEN250 




: rem 

1 59 

270 

IFPEEK(5120)< > 2 8THENGOSU B 3 9 0 

: rem 

149 

280 

GOSUB460 

: rem 

1 80 

290 

IFAS="1"ANDB$="1"THEN330 

: rem 

241 

300 

IFE$="2"THENGOSUB660 

: rem 

1 37 

310 

GOTO 340 

: rem 

100 

320 

IFA$="2"THEN340 

: rem 

2 

330 

GOSUB660:POKEI6202,0 

: rem 

1 1 4 

340 

SYSl5486:IFPEEK(16256)<229ANDPEEK(162 


56)>150THENI = 0 :GOTOl120 

: rem 

247 

350 

J=PEEK(1 6252)+1 6264 :R=INT(J/l0-1 628.5 


):C=J-16285-10*R:GOSUB980 

: rem 

159 

360 

J=PEEK(1 6253)+1 6264 :R=INT(J/l0-1 628.5 


):C=J-16285-10*R:GOSUBl030 

: rem 

196 
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370 IFPEEK(16256)<99ANDPEEK(16256)>27THEN 



1 = 1 :GOTO!120 

:rem 

98 

380 

GOTO320 

: rem 

105 

390 

PRINT"{GIU' }{CYN}ATTENDERE- 




: rem 

161 

400 

FORI=0TO431:POKE5120+1, 

PEEK(32768 + 1 ) : 


NEXT 

: rem 

1 70 

410 

FORI=0TO223:READJ:POKE6224+I,J 




: rem 

45 

420 

POKE5776+I,JOR85 

: rem 

1 50 

430 

POKE6000 + I,JANDl 70 

: rem 

225 

440 

POKE5552+I,(JANDl70)OR(255-JAND85) 

: NE 


XT 

: rem 

252 

450 

RETURN 

: rem 

1 21 

460 

POKE36869,205 

: rem 

1 56 

470 

PRINT"{CLR}{GIU'}{CYN}{ 

5 SPAZI}LIVEL 


LO"PEEK(l6201)"{GIU'}{WHT} :rem 

no 

480 

POKE36878,15:POKE646,9: 

IFB$="1"THEN50 


0 

: rem 

1 28 

490 

POKE36878,31:POKE646,8: 

POKEl6288,6 

: PO 


KEl 6289,5:POKEl 6358,250 

:POKEl6359, 

251 



: rem 

233 

500 

IFE$="1"THEN530 

: rem 

6 


510 FORK=0TO70STEPl0 :FORJ=0TO7:POKEl 6285+ 
K+J,0 :NEXT:NEXT :rem 54 

520 GOSUB1210:GOSUB1210:RETURN :rem 115 
530 PRINT"{ 3 SPAZI}{RVS}Z£{OFF}Z[<->] 
{RVS}VX{OFF)[<+>][<£>]{RVS} ${OFF} 
[<t>j{SPAZI}{RVS}RT{OFF}t<I>][<@>]" 

:rera 16 

540 PRINT"{ 3 SPAZI}{RVS}[]{OFF}+-{RVS}WY 
{OFF} [ <M> J _£ { RVS }#%{OFF} {<*>} [<K>1 
{RVS}SU{OFF}[<T>)[< G >]" :rem 34 

550 PRINT"{ 3 SPAZI}VX{RVS}NP{OFF}VX{RVS} 

np{off}vx{rvs}npToff}vx{rvs}np" 

:rem 153 

560 PRINT"{ 3 SPAZI}WY{RVS}OQ{OFF}WY{RVS} 

oq{off}wy{rvs}oqToff}wy{rvs}oq" 

:rem 170 

570 GOSUBl210 : rem 224 

580 PRINT"{ 3 SPAZI}[<R>1[<H>]:<[<R>1 
[<H>]:<[<R>}[<H>]:<[<R>][<H>J:<" 

:rem 222 

590 PRINT"{ 3 SPAZI}[<W>J[<J>J;=[<W>] 

[<J>J;=[<W>J[<J>};=[<W>][<J>];=" 

:rem 239 

600 PRINT"{ 3 SPAZI}FH[<L>)[<U>]BD{RVg}BD 
{OFF} NP@ {<C>1>*[<V>}{RVS}@" :rem 53 
610 PRINT t T - 3 spazi}gi[<y>]{<o>]ce{rvs}ce 



{OFF}OQ[<F>)[<X>]?A[<B>}{RVSTÀ" 




: rem 

70 

620 

POKE4173,162 

: rem 

91 

630 

IFB$="1"THENRETURN 

: rem 

79 

640 

PRINT"{HOME}{ 3 GIU'}"SPC(9) 

" (<N> J 



[<D>]{RVS}t " 

: rem 

43 

650 

PRINT"{ 13 GIU'}"SPC(9)"{RVS}FH{OFF} 


jl{giu'}":RETURN 

: rem 

240 

660 

GETC$:IFC$=""ORFTHEN740 

: rem 

69 

670 

N=0 

:rem 

88 

680 

IFMID$(D$,N+1,1)=C$THEN710 

: rem 

130 

690 

N=N+1:IFN<13THEN680 

: rem 

88 

700 

GOTO740 

: rem 

107 

710 

J=16285+C+l0*R:IFN>6THENN=262-N 




s rem 

245 

720 

IFNTHENGOSUBl040:GOT0740 

s rem 

248 

730 

GOSUB990:FORI=0TOl:FORP=0TOl 

:POKEK+22 


*P+I,M:NEXT:NEXT 

: rem 

1 81 

740 

POKE371 54,1 27:I=PEEK(371 52)AND! 28: 

J=( 


1 = 0) 

: rem 

2 

750 

POKE37154,255:I=PEEK(37151) 

: rem 

206 

760 

R=R+((IAND8)=0)-((IAND4)=0) 

: rem 

152 



770 

C=C+((IANDl6)=0)-J 

: rem 

149 

780 

IFR<0THENR=0 

: rem 

21 8 

790 

IFR>7THENR=7 

: rem 

235 

800 

IFC<0THENC=0 

: rem 

1 81 

81 0 

IFC>7THENC=7 

: rem 

198 

820 

1 = 4473-44* R+C +C 

: rem 

223 

830 

J=PEEK(I) 

: rem 

225 

840 

P=56:IFJ>106THENP=-P 

: rem 

1 81 

850 

POKEl,J+P:POKEI+22,J+P+l 

: rem 

148 

860 

POKEI+1,J+P+2:POKEl+23,J+P+3 

: rem 

81 

870 

FORP=0TO70:NEXT 

: rem 

198 

880 

POKEl,J:POKEI+22,J+l 

: rem 

161 

890 

POKEI+1,J+2:POKEl+23,J+3 

: rem 

94 

900 

FORP=0TO30:NEXT 

: rem 

1 88 

91 0 

IF(PEEK(37151)AND32)THEN660 

: rem 

244 

920 

J=16285+C+l0*R 

: rem 

1 58 

930 

IFFTHENl020 

: rem 

99 

940 

IFPEEK(J)=0ORPEEK(J)>6THEN660 

: rem 

249 

950 

F=1 .-GOSUB980 

: rem 

1 73 

960 

IF(PEEK(37151)AND32)THEN660 

: rem 

249 

970 

GOTO960 

: rem 

1 20 

980 

POKE36876,225 

: rem 

1 63 

990 

K=4473-44*R+C+C:N=PEEK(J):POKEJ,0 

: rem 

1 25 


1000 M=54:IF(R+C)/2-INT((R+C)/2)THENM=110 

:rem 21 


1010 POKE36876,0:RETURN :rem 117 
1020 F=0 : rem 118 
1030 FORI=OTOl:FORP=0TOl:POKEK+22*P+I,M:N 



EXT:NEXT 

: rem 

1 31 

1040 

K=4473-44*R+C+C 

: rem 

12 

1050 

M= 54 :IF(R+C)/2-INT((R+C)/2)THENM 

= 110 



: rem 

26 

1 060 

IFR=0ANDN=255THENN=251 

: rem 

97 

1 070 

IFR= 7ANDN = 1THENN= 5 

: rem 

1 55 

1080 

IFN>7THENM=M+28 

: rem 

1 82 

1 090 

POKEJ,N:IFN>6THENN=256-N 

:rem 

26 

1 1 00 

FORI=OTOl:FORJ=OTOl:POKEK+22*J+I 

,M+4 


*N+I+I+J:NEXT:NEXT 

: rem 

1 69 

ilio 

RETURN 

: rem 

163 

1 1 20 

IFPEEK(16202)THENI=I+1 

: rem 

30 

1130 

I=I+VAL(B$):PRINT"{GIU'}{CYN}SCACCO 


MATTO."; 

: rem 

1 74 

1 140 

IFI/2-INT(1/2)THENPRINT"NERO VINCE": 


GOTO!160 

: rem 

246 

1 1 50 

PRINT"BIANCO VINCE" 

:rem 

1 85 

1160 

POKE36876,240 : FORI = 0TO500 

: NEXT 




: rem 

79 

11 70 

POKE36876,195:FORI=0TO500 

: NEXT:POKE3 


6876,0 

: rem 

44 

1 1 80 

PRINT"{SU}PREMI FUOCO."; 

: rem 

142 

1190 

IF(PEEK(37151)AND32)THEN1190 




s rem 

84 

1 200 

RUN 

:rem 

1 84 

1210 

FORK=lT02:FORJ=lT02 

s rem 

231 
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1 220 


1 230 
1 240 


1 250 
1 260 
1 270 
1 280 
1 290 
1 300 
1 310 
1 320 

1330 

1 340 

1 350 

1 360 

1 370 

1 380 

1 390 

1 400 

1410 

1 420 

1430 

1440 

1 450 

1 460 

1 470 


PRINT"{ 3 SPAZI}[< 2 S>]{ 2 R} 


[< 2 

S>] { 2 R} [< 2 S> J{ 2 R} 


[< 2 

S>]{ 2 R}" : rem 

1 50 

NEXT: 

F0RJ = 1T02 : rem 

1 79 

PRINT"{ 3 SPAZI}} 2 R}[< 2 S>] 

{ 2 R}[< 2 S>]{ 2 R}T< 2 S> J { 2 

R} 

[< 2 

S>}" ; rem 

1 52 

NEXT: 

NEXT:RETURN :rem 

1 54 

DATA 

4,2,3,5,6,3,2,4,7 :rem 

23 

DATA 

7,1,1,1,1,1,1,1,1,7 :rem 

1 02 

DATA 

7,0,0,0,0,0,0,0,0,7 :rem 

95 

DATA 

7,0,0,0,0,0,0,0,0,7 :rem 

96 

DATA 

7,0,0,0,0,0,0,0,0,7 :rem 

88 

DATA 

7,0,0,0,0,0,0,0,0,7 :rem 

89 

DATA 

7,255,255,255,255,255,255,255,2 

55,7 

: rem 

1 86 

DATA 

7,252,254,253,251,250,253,254,2 

52 

: rem 

67 

DATA 

0,0,0,0,0,0,0,0,0,0,0,0,0,0 

,0,0 


: rem 

1 1 8 

DATA 

0,0,0,0,0,0,0,0,0,0,0,0,0,0 

,0,0 


: rem 

119 

DATA 

0,0,0,0,0,3,3,0,3,0,0,3,3,0 

,0,0 


: rem 

1 35 

DATA 

0,0,0,0,192,240,240,192,240 

,192 

,192, 

240,240,0,0,0 :rem 

39 

DATA 

0,48,63,63,63,15,63,63,60,60,60 

,0,3, 

15,15,0 :rem 

26 


DATA 0,0,0,192,240,240,252,252,252,2 
52,252,252,252,252,252,0 :rera 100 
DATA 0,3,15,15,15,15,15,15,15,0,3,0, 
3,63,48,0 :rem 107 
DATA 0,48,204,204,204,204,252,252,25 
2,0,240,0,240,63,3,0 :rem 139 
DATA 0,51,51,63,63,12,15,15,15,15,15 
,12,63,63,63,0 :rem 114 
DATA 0,204,204,252,252,48,240,240,24 
0,240,240,48,252,252,252,0 :rem 197 
DATA 0,3,3,3,51,51,51,63,15,0,15,15, 
15,0,15,0 : rem 105 
DATA 0,48,48,48,51,51,243,255,252,0, 
252,60,252,0,252,0 :rem 71 
DATA 0,0,3,0,12,63,63,63,63,0,15,15, 
15,0,15,0 :rem 107 
DATA 0,192,240,192,204,63,255,255,25 
5,0,252,60,252,0,252,0 :rem 12 
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di N.W. Schultz 

trad. ed adatt. 

di S. Coloaibo 




Ecco un gioco a puzzle, affasci¬ 
nante ed avvincente, per diver¬ 
tirsi insieme al proprio compu¬ 
ter. 


S iete pronti a mettere il vostro cervel¬ 
lo in gara contro il computer? 
“Mindbusters” offre tre puzzle grafici 
che vi garantiranno il surriscaldamento 
di tutti i microprocessori e chip di me¬ 
moria della vostra mente! 

Potete scegliere di risolvere uno dei tre 
possibili puzzle, in base a quanto volete 
essere crudeli nei confronti di voi stessi; 
vi consigliamo comunque di iniziare con 
il primo: è il più facile. 

A seconda della selezione impostata, il 
programma costruisce un certo puzzle 
e lo visualizza nell’angolo superiore sini¬ 
stro dello schermo. Vostro compito è 
fare in modo che i vari pezzi, si dispon¬ 
gano nello “spazio di lavoro” sottostan¬ 
te, nello stesso ordine del puzzle gene¬ 
rato dal computer. 

In più dovrete cercare di risolvere il 
puzzle nel minor tempo possibile: un ti¬ 
mer continua a progredire, mentre voi 
pensate; non esiste un limite di tempo 
specificato, ed il timer vi permette di 
confrontare il vostro tempo attuale con 
prestazioni precedenti, oppure il tempo 
ottenuto da qualche vostro amico. Il mi¬ 
glior tempo realizzato in una seduta di 
gioco viene visualizzato sullo schermo, 
sopra al timer. 

Ogni puzzle è composto da diverse ri¬ 
ghe orizzontali, contenenti forme etero¬ 
genee, ed una piccola freccia a destra 
dell’area di lavoro vi mostra su quale 
riga state lavorando in quel momento. 
Per passare su altre righe muovete la 
freccia verso l’alto o verso il basso, ri¬ 


Mindbusters per Vie 20 


spettivamente premendo il tasto “I” ed 
il tasto “M”. Per spostare una riga del 
puzzle verso destra o verso sinistra oc¬ 
corre premere rispettivamente il tasto 
“K" ed il tasto “J”. Quando pensate che 
la disposizione di una riga sia quella cor¬ 
retta, passate alla riga successiva e cer¬ 


cate di riprodurla uguale a quella gene¬ 
rata dal computer. Se riuscite a ripro¬ 
durre il puzzle, il programma ve lo se¬ 
gnala in modo automatico. 
“Mindbusters” può generare un numero 
incredibilmente elevato di puzzle sem¬ 
pre diversi, per garantire la non ripetibi¬ 
lità delle partite. 


30 TM$="":F0RI=lT068:TM=ASC(MID$(A$,I,l)) 
+ 97 :TM$=TM$+CHR$(TM) :NEXT:A$=TM$ 

:rem 44 

40 B$="12*OZ*Z*,0<2Z/*/00,Z/02ZZ2Z*l,<Z-2 
l,-2*Z<0Z-210*,Z*Z*l<122Z<Zl*<Z,*Z" 

:rem 166 


10 S=30720:R$="000000":FORJ=lT04:READKE(J 
):NEXT:PRINTCHR$(14)CHR$(8) :rem 240 
20 A$="XVAWVBWWAXNAWVBWWAXAWVBWANANAVVWAN 
NNXAWVWAXWAXCVNVNWAWVBNWCCXVNVAWNW" 

:rem 56 


58 SUPERO 6® 10/85 





















































50 TM$ = "": FORI = 1TO68:TM=ASC(MID$(B$,I,1)) 
+ 129 :TM$=TM$+CHR$(TM) :NEXT:B$=TM$ 

:rem 92 

60 c$="zz$$$zz$$z$z$z$z$zzzzz$z$$$z$$$z$z 

$$$$Z$Z$ZZZZ$Z$Z$$$Z$ZZZZZZ$$Z$$Z$" 

: rem 1 0 

70 TM$ = "": FORI = 1T068:TM=ASC(MID$(C$,I,1) ) 
+ 133 :TM$ = TM$+CHR$(TM) :NEXT:C$ = TM$ 

:rem 91 

80 POKE36 879, 31 :PRINT"{CLR}{PUR}{ 22 *_} 

:rem 45 

90 PRINT"{BLK}{RVS}{ 5 SPAZI}MINDBUSTERS 
{ 6 SPAZI} {OFF}"; Trini TI 1 

100 PRINT"{PUR}{ 22 *}":GOSUB530: rem 208 
110 PRINT"{HOME}{ 3 GIU'}{DES}{<4>] 

{< 12 P>]{ 3 SPAZI}USA":PRINT"{<N>1"S 
PC(12)"[<H>]" : rem 65 

1 20 PRINT" [<N>] "SPC (1 2) " [<H>1 I^J,K,M" :PRI 

NT"[<N>]"SPC(12)"(<H>]" : rem 150 

130 PRINT"[<N>]"SPC(12)"[<H>]PER CO-":PRI 
NT"[<N>]"SPC(12)"[<H>]" : rem 142 

140 PRINT"{<N>]"SPC(12)"[<H>]PIARE I":PRI 
NT"[<N>]"SPC(12)"[<H>)" : rem 163 

150 PRINT"[<N>]"SPC(12)"{<H>]DISEGNI":PRI 
NT"{DES}[< 12 Y>]" : rem 98 

160 POKE214,3:PRINT :rem 131 

170 FORN=lT08:PP(N)=INT(RND(1)*56)+1:PRIN 
T"{DES}"CHR$(Z)MID$(D$,PP(N),12) 

:rem 228 

180 NEXT:PRINT:PRINT" {BLK}[< 12 P>] 

{ 2 SPAZI}NEL " : rem 77 

190 PRINT"[<N>]"SPC(12)"{<H>PRINT" 

[<N>]"SPC(12)"(<H>}MINOR " :rem 115 
200 PRINT"[<N>]"SPC(12)"[<H>]":PRINT" 
[<N>]"SPC(12)"I<H>]TEMPO{ 2 SPAZI}" 

:rem 107 

210 PRINT"[<N>]"SPC(12)"{<H>]":PRINT" 

[<N>]"SPC(12)"[<H>]{ 2 SPAZI}!!! 

{ 2 SPAZI}" : rem 74 

220 PRINT"[<N>]"SPC(12)"[<H>]" :rem 161 
230 PRINT"[<N>]"SPC(12)"[<H>]{ 5 SPAZI}": 

PRINT"{DES}{< 12 Y>] " ; :rem 153 

240 POKE214,13:PRINT : rem 179 

2 50 FORN =1T08:P(N)=INT(RND(1)*56)+1 :PRINT 

"{DES}"CHR$(Z) MID$ (D$,P(N),12):NEXT 

: rem 188 

260 FORI=lTO4000:NEXT:PRINT"{HOME} 

{ 3 GIU'}"; : FORI = 1TOl8 :PRINTSPC(14)" 

{ 7 SPAZI}":NEXT : rem 166 

270 PRINTSPC(14)"{ 7 SPAZI}";:AL=8002:POK 
EAL,31 :POKEAL+S,0 :AC = 1:TI$ = "000000" 

:rem 45 

280 POKEl98,0:KE=PEEK(197):J = 0: FORI = 1T04: 

IFKE=KE(I)THENJ=I: 1 = 4 :rem 56 

290 NEXT:ONJGOTO340,360,380,400 :rem 23 
300 POKE214,3:PRINT:PRINTSPC(16)"{RED} 

{RVS}MAX:{OFF}:" : rem 194 

310 PRINT"{BLK}":PRINTSPC(16)MID$(R$,3,2) 
+":"+MID$(R$,5,2) : rem 52 

320 POKE214,8:PRINT:PRINTSPC(16)"{RVS}TEM 
PO{OFF}:" : rem 18 

330 PRINT"{GIU'}"SPC(16)MID$(TI$,3,2)":"M 
ID$(TI$,5,2): GOTO280 :rem 61 

340 POKEAL,32 :AL=AL-22 :AC=AC-1:IFAL<8002T 
, HENAL=8002:AC=1 :rem 46 

350 POKEAL,31 :POKEAL+S,0 :GOTO280: rem 193 
360 POKEAL,32 :AL=AL+22:AC=AC + 1:IFAL>8156T 
HENAL=8156:AC=8 :rem 73 

370 GOTO350 :rem 107 

380 POKE214,12+AC :PRINT:P(AC)=P(AC)-1:IFP 
(AC)<1THENP(AC)=1 :rem 162 


390 GOTO410 :rem 106 

400 POKE214,12+AC :PRINT:P(AC)=P(AC)+1:IFP 
(AC)>56THENP(AC)=56 :rem 15 

410 PRINT"{DES}"CHR$(Z)MID$(D$,P(AC),12) 

:rem 198 

420 F0RX=1T08:IFPP(X)<>P(X)THEN280 

:rem 108 

430 NEXT:SC$=TI$ :rem 200 

4 40 POKE36878,1 5:FORI = 1T03:POKE36875,220 : 
FORJ=lTO400:NEXT:POKE36875,0:POKE3687 
6,220 :rem 223 

450 FORJ=lTO400:NEXT:POKE36876,0:NEXT:POK 
E36878,0 :rem 9 

460 POKE214,13:PRINT:PRINTTAB(16)"{RED}0 
K!":PRINTTAB(15)"{GIU'}BUONO!" 

: rem 118 

4 70 PRINTTAB(17)"{GIU'}! !":PRINTTAB(15)" 
{GIU*}ANCORA":PRINTTAB(15)"{GIU'}(S/ 
N) ?" ; : rem T14 

480 POKE36879,28:GETKS:IFK$=""THENPOKE368 
79,27:GOTO480 :rem 199 

490 IFK$="N"THENSYSl024 :rem 95 

500 IFR$="000000"ORSC$<R$THENR$=SC$ 

:rem 228 

510 IFK$="S"THEN80 :rem 255 

520 GOTO480 :rem 108 

530 PRINT"{ 2 GIU’}{BLK}{ 3 DES}VUOI:":PR 
INT"{ 2 GIU’}{RVS}{ 2 DES}1{OFF} FOND 
ERE LA TESTA" :rem 60 

540 PRINT"{ 2 DES}{ 2 GIU'}{RVS}2{OFF} B 
RUCIARE LA TESTA" : rem lT9 

550 PRINT"{ 2 DES}{ 2 GIU'}{RVS}3{OFF} E 
SSERE RICOVERATO" : rem 2?7 

560 POKE36879,27:GETK$:IFK$=""THENPOKE368 
79,28:GOTO560 :rem 197 

570 K=VAL(K$):IFK<lORK>3THEN560 :rem 111 
580 IFK=1THEND$ =A$:Z = 31 : GOTO610 :rem 93 
590 IFK = 2THEND$ = B$:Z = 28: GOTO610 :rem 102 
600 D$=C$:Z=144 :rem 12 

610 PRINT"{HOME}{ 3 GIU'}":FORN=1TOl2 :PRI 
NT"{ 21 SPAZI}":NEXT:RETURN :rem 47 
620 DATA 12,36,44,20 :rem 204 
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10 R$="000000":FORI=1T04:READKE(I):NEXT 

:rem 32 
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20 PRINTCHRS(14)CHR$(8) : rem 48 

30 A$ = "XVAWVBWWAXNAWVBWWAXAWVBWANANAVVWAN 
NNXAWVWAXWAXCVNVNWAWVBNWCCXVNVAWNW" 

; :rem 57 

40 TM$=" ":FORI=lT068:TM=ASC(MID$(A$,I,1) 

)+97 :TM$=TM$+CHR$(TM):NEXT:A$=TM$ 

:rem 45 

50 B$="12*0Z*Z*,0<2Z/*/00,Z/02ZZ2Z+1,<Z-2 
1,-2*Z<0Z-210*,Z*Z*1<122 Z< Zi*< Z , * Z" 

:rem 167 

60 TM$="":F0RI=lT068:TM=ASC(MID$(B$,I,l) ) 
+ 129 :TM$=TM$+CHR$(TM) :NEXT:B$=TM$ 

:rem 93 

70 C$="ZZ$$$ZZ$$Z$Z$Z$Z$ZZZZZ$Z$$$Z$$$Z$Z 
$$$$Z$Z$ZZZZ$Z$Z$$$Z$ZZZZZZ$$Z$$Z$" 

:rem 11 

80 TM$="":FORI=lT068:TM=ASC(MID$(C$,1,1)) 
+ 133 :TM$=TM$+CHR$(TM) :NEXT:C$=TM$ 

:rem 92 

90 COLORO, 2 : PRINT" {CLR} {PUR} { 40 M"; 

:rem 235 

100 PRINT"[<4>]{RVS}{ 14 SPAZI} MINDBUSTE 
RS { 15 SPAZI}{OFF}"; :rem 168 

110 PRINT"{PUR}{ 40 M":GOSUB460:COLOR4,8 

:rem 164 

120 PRINT"{HOME}{ 3 GIU’}{ 4 DES}[<4>] 

[< 12 P>)":PRINT"{ 3 DES}[<N>]"SPC(12 
)"{<H>}{ 2 DESjUSA I, J, K{ 2 SPAZI} 


220 


230 

240 

250 

260 


270 


280 

290 

300 

310 


FORN =1TO8 :P(N)=INT(RND(1)*56)+1 :PRINT 
TAB(19)CHR$(Z)MID$(D$,P(N),12):NEXT 

:rem 234 

AL=3664:S=-1 024 :POKEAL,31:POKEAL+S,0: 
AC=1:TI$="000000" :rem 14 

POKE239,0 :KE=PEEK(2038) :J = 0:FORI = lTO4 
:IFKE=KE(I)THENJ=I: I=4 :rem 92 

NEXT:ONJGOTO280,320,300,340 :rem 13 
POKE205,13:PRINT:PRINT"{ 4 DES}{RED} 
{RVS}RECORD{OFF}{DES}{BLK}"MID$(R$,3, 
2)+": Tr +MID$ (R$,5,2) : rem 186 

PRINT"{GIU'}{ 4 DES}{RVS}TEMPO{OFF} 

{ 2 DES}"MID$(TI$,3,2)":"MID$(TIS,5,2 
):GOTO240 :rem 245 

POKEAL,32:AL=AL-40:AC=AC-1:IFAL<3664T 
HENAL=3664:AC = 1 : rem 67 

POKEAL,31 :POKEAL+S,0 :G0T02 40 : rem 192 
POKEAL,32:AL=AL+40:AC=AC+1:IFAL>3944T 
HENAL=3944:AC=8 :rem 67 

GOTO290 : rem 104 


320 POKE205,1 2+AC :PRINT:P(AC)=P(AC)-1:IFP 
(AC)<1THENP(AC)=1 : rem 156 

330 GOTO350 :rem 103 

340 POKE205,1 2+AC:PRINT:P(AC)=P(AC)+1 :IFP 
(AC)>56THENP(AC)=56 :rem 18 

350 PRINTTAB(19)CHRS(Z)MID$(D$,P(AC),12) 

:rem 250 

360 FORX=1TO8:IFPP(X)<>P(X)THEN240 

:rem 107 

370 NEXT:SC$=TI$ :rem 203 

380 POKE205,15:PRINT:PRINT"{ 4 DES}{BLK} 

{RVS}TEMPO{OFF}{ 3 DES}"MID$(SC$,3,2) 
+ ":"+MID$(SC$,5,2) : rem 43 

390 PRINT"{GIU 1 }{ 3 DES}{PUR}PUZZLE RISOL 
TO!":GOSUB570:PRINT"{GIU'T{BLK} 

{ 4 DES}ANCORA?" : rem 17 

400 PRINTSPC(7)"{GIU'}{RVS}S{OFF}/{RVS}N 
{OFF}" :rem 2 Ìj2 

410 COLOR4,5 :GETK$: IFK$ = ""THENCOLOR4,4 :GO 
TO410 :rem 53 

420 IFK$ = "N"THENEND : rem 105 

430 IFR$="000000"ORSC$<R$THENR$=SC$ 

:rem 230 

440 IFK$="S"THEN90 :rem 2 

450 GOTO410 :rem 103 

460 PRINTSPC(10)"{ 3 GIU'}{BLK}VUOI 

{ 10 SPAZI}:":PRINTSPC(11)"TgIU'} 
{RVS}1{OFF} BRUCIARTI IL CERVELLO" 



E{ 2 SPAZI}M" 

: rem 

242 



: rem 

99 

1 30 

PRINT"{ 3 DES}[<N>]"SPC(12)" 

t <H> ] 

" :PR 

470 

PRINTSPC(11)"{GIU'}{RVS}2{OFF} SPACCA 


INT"{ 3 DES}[<N>1"SPC(12)"[<H>] 



RTI IL CERVELLO" 

: rem 

247 


{ 2 DES}PER FAR COINCIDERE" 

: rem 

101 

480 

PRINTSPC(11)"{GIU'}{RVS}3{OFF} FONDER 

1 40 

PRINT"{ 3 DES}f<N>)"SPC(12)" 

[ <H> 1 

" :PR 


E IL CERVELLO" 

: rem 

98 


INT"{ 3 DES}[<N>]"SPC(12)"[<H>] 


490 

COLOR4,4 :GETK$:IFK$ = ""THENCOLOR4, 

5 : GO 


{ 2 DES}I DISEGNI IL PIU'" 

: rem 

199 


TO490 

: rem 

69 

1 50 

PRINT"{ 3 DES}[<N>]"SPC(12)" 

[ <H> ] 

" : PR 

500 

K=VAL(K$):IFK<1ORK>3THEN490 

: rem 

106 


INT"{ 3 DES}[<N>]"SPC(12)"I<H>J 


510 

IFK=1THEND$=A$:Z=31:GOTO540 

: rem 

88 


{ 2 DES}IN FRETTA POSSIBILE! 

•i 


520 

IFK=2THEND$=B$:Z=28:GOTO540 

: rem 

97 


PRINT"{ 3 DES}[<N>)"SPC(12)" 

: rem 

250 

530 

D$=C$:Z=144 

: rem 

1 4 

160 

[<H>] 

" :PR 

540 

PRINT"{HOME}{ 3 GIU'}":FORN= 

1 TO 1 0 

: PRI 


INT"{ 4 DES}[< 12 Y>] " 

: rem 

14 


NT"{ 38 SPAZI}":NEXT 

: rem 

21 

1 70 

POKE205,3 :PRINT 

: rem 

1 32 

550 

RETURN 

: rem 

1 22 

1 80 

FORN=1T08:PP(N)=INT(RND(1)*56)+1: 

PRIN 

560 

DATA33,37,36,34 

: rem 

21 7 


T"{ 4 DES}"CHR$(Z)MID$(D$,PP(N),12) 

570 

VOL8:FORI = 110TO1OOOSTEPl0 :SOUND1 , 

I, .5 



: rem 

60 


: NEXT 

: rem 

1 1 2 

190 

NEXT:PRINT:PRINTTAB(19)"{BLK} 

1 

580 

FORI = l 000TO110STEP-10 :SOUND1 

# X § • 5 

:NEX 


(< 12 P>]" 

: rem 


T 

: rem 

59 

200 

FORN=lT08:PRINTTAB(18)"1<N>] 

"SPC(12)" 

590 

RETURN 

: rem 

1 26 


[<H>]":NEXT:PRINTTAB(19)"[< 

12 Y>]" 







s rem 

1 46 





210 

POKE205,13:PRINT 

: rem 

1 76 
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John Scriven, Patrick 

COMMODORE 64 
A SCUOLA 


Imparare è bello se lo si fa div 
tendosi; è il messaggio di que¬ 
sto libro scolastico ma diverten¬ 
te, sul Commodore 64. 

Cod. 574D Pag. 182 Lire 18.000 


Umberto Barzaghi 

STATISTICA A UNA 
DIMENSIONE CON IL C64 

Il primo manuale didattico 
espressamente studiato per 
l'apprendimento dei principi 
fondamentali della statistica 
tramite calcolatore. 

Cod. 5 70A Pag. 172 Lire 17.000 


Rita Bonelli 

COMMODORE 16 PER TE 
BASIC 3.5 

Il primo libro-cassetta sul Com¬ 
modore 16 per imparare il BA¬ 
SIC sul video. 

Con cassetta. 

Cod. 413B Pag. 294 Lire 35.000 


fa testo 


Czes Kosniowski 

MATEMATICA 
E COMMODORE 64 


Un libro per chi vuol saperne di 
più sulle applicazioni matemati¬ 
che del C64, per studiare ma 
anche per divertirsi. 

Con cassetta. 

Cod. 570D Paci. 158 Lire 24.000 


Totomac 

IL SISTEMA TOTOMAC 
la nuova frontiera del 
totocalcio per C64 

Uomo del nostro tempo, Toto¬ 
mac si affida all'ausilio del com¬ 
puter per individuare le proba¬ 
bilità meno utilizzate dalla mas¬ 
sa dei giocatori, e, avendo ben 
presente i principi della selezio¬ 
ne naturale, cerca di batterli 
con tecniche intelligenti. 

Con cassetta. 

Cod. 5760 Pag. 128 Lire 24.000 

Michael Browne 

UNITÀ A DISCHI 
per Personal Computer 

Il libro, destinato a lettori con 
una buona conoscenza di base 
dell'uso di un calcolatore e del 
linguaggio BASIC, descrive il 
funzionamento dell’unità a di¬ 
schi di un personal computer e 
il significato dei comandi relati¬ 
vi, con particolare attenzione 
per le diverse tecniche di ge¬ 
stione dei file su disco. 

Cod. 3OOP Pag. 158 Lire 15.000 
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Riviste firmate JACKSON 


MnOMAIIONi 

Un'aggiornatissima panoramica delle nuove 
tecnologie microelettroniche e informatiche 
applicate all'automazione industriale. 

11 numeri all'anno L. 5.000 a numero 
Abbonamento solo L. 46.000 

T Elettronica 

Quindicinale di politica industnale. 
componentistica, informatica e 
telecomunicazioni per uomini di marketing, 
responsabili acquisti, manager di settore 
22 numeri all'anno: L 3.000 a numero 
Abbonamento: solo L 49.000 

NORMOTCA 

La rivista professionale per chi si occupa di 
sistemi dai microcomputer al mini, ai 
supermini. ai mainframe Con notizie in 
anteprima dall'America. 

11 numeri all'anno: L. 4.500 a numero 
Abbonamento: solo L 40.000 


elettronica 


Il punto di riferimento più qualificato per chi 
voglia aggiornarsi su prodotti, applicazioni, 
tecnologie elettroniche, in Italia e all'estero 
20 numeri all'anno: L. 4.000 a numero 
Abbonamento: solo L 64.000 


_g_■ 

rosicai 
corri ptrrer 
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11 nuovo fai da te per I"hobbista elettronico, 
con progetti sempre nuovi e originali da realiz 
e divagazioni sul mondo dei micro computer. 

12 numeri all'anno: L 5.500 a numero 
Abbonamento: L 32.000 


Il mondo delle 7 note in 


versione ... elettronica. Con test strumentali, 
novità e analisi del mercato, servizi speciali. 
11 numeri all'anno: L 4.000 a numero 
Abbonamento: solo L. 35.000 


PERSONAL 

SOFTWARE 

Aspetti e problemi del software per personal 
computer, programmi, giochi e sistemi 
operativi 

11 numeri all'anno L. 4.500 a numero 
Abbonamento solo L. 39.000 


Le frontiere aperte dalla telematica, le 
telecomunicazioni professionali in tutti i loro 
sottosetton 

11 numeri all'anno: L. 4.000 a numero 
Abbonamento: solo L. 36.000 


PC 


Una novità assoluta per l'editoria 
tecnico-scientifica, studiata appositamente 
per i medici, la Rivista di personal computer, 
affari personali e tempo libero. 

11 numeri all'anno: L. 5.000 a numero 
Abbonamento: solo L. 45.000 


L'unica rivista italiana dedicata ai sistemi 
MS-DOS. Personal computer IBM e 
compatibili. 

11 numeri all'anno: L. 5.000 a numero 
Abbonamento: solo L. 44.000 
UiDCC 

La guida indiscussa al fantastico mondo dei 
videogames La più eccitante, divertente, 
istruttiva rassegna del settore 
11 numeri all'anno: L 4.000 a numero 
Abbonamento solo L 33.000 


La prima rivista europea di personal 
computer, software e accessori Con test 
novità, analisi del mercato 
11 numeri all'anno L. 5.000 a numero 
Abbonamento solo L. 43.000 


Personal 


L'unica nvista indipendente per gli utenti dei 
personal computer Olivetti 
11 numeri all'anno: L. 5.000 a numero 
Abbonamento: solo L 42.000 

COMPUSCUOLA 

La rivista di informatica nella didattica per la 
scuola italiana 

9 numeri all'anno: L. 3.000 a numero 
Abbonamento solo L. 20.000 
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IL MANUALE DEL BASIC 

di M. Sanglorgio 
Gruppo Editoriale Jackson 
di M. Cristnib Grizzi 



Tra tutti i linguaggi di programmazione 
attualmente esistenti per gli “home 
computer” il BASIC è senz’altro quello 
che gode della maggiore popolarità. È 
quasi sempre direttamente disponibile 
nella ROM del computer, e quindi non 
necessita di caricare l’interprete da na¬ 
stro o disco dopo l’accensione della 
macchina. 

I suoi maggiori vantaggi rispetto agli al¬ 
tri linguaggi “concorrenti” sono riassu¬ 
mibili in semplicità di apprendimento 
delle varie istruzioni e delle loro funzioni 
e nella facilità di collegamento tra diver¬ 
si gruppi di istruzioni. Per contro il BA¬ 
SIC presenta lo svantaggio di una certa 
lentezza nell’esecuzione dei programmi 
e nel grande proliferare di numerosi 
“dialetti”, che ne hanno praticamente 


stroncato sul nascere la standardizza¬ 
zione. 

Data la sua capillare diffusione, il BA¬ 
SIC sarebbe infatti potuto diventare un 
linguaggio tale da permettere - poniamo 
- di scrivere un programma sul C64 e 
farlo “girare” successivamente su un 
TI99/4A piuttosto che su un Apple... 
Purtroppo le cose non sono andate così 
ed ogni azienda produttrice di computer 
ha sviluppato una propria versione del 
BASIC per sfruttare al meglio le parti¬ 
colari caratteristiche hardware del com¬ 
puter prodotto: da qui il moltiplicarsi 
dei mille dialetti e lo sfumare del sogno 
della perfetta compatibilità dei pro¬ 
grammi tra macchine diverse. 

Con un minimo di lavoro e un buon sup¬ 
porto tecnico è tuttavia possibile esegui¬ 
re la conversione di un programma tra 
un dialetto BASIC e un altro, per otte¬ 
nere la particolare versione di un certo 
programma, che giri sul proprio compu¬ 
ter. 

“Il manuale del BASIC” si propone co¬ 
me insostituibile strumento per chi in¬ 
tendesse accingersi a questo lavoro di 
conversione: quanti di noi, infatti, dopo 
aver visto girare sul computer XXXX il 
famoso programma YYYY non hanno 
desiderato di riuscire in qualche modo 
a convertirlo per la propria macchina? 
Il libro considera ben 9 diversi dialetti 
BASIC tra i più diffusi, nell’ordine quelli 
del TI99/4A, VIC 20, C64, ZX81, ZX 
SPECTRUM, SHARP MZ700, PC IBM, 
OLIVETTI M20, APPLE II. 

Tutte le istruzioni vengono confrontate 
tra loro e vengono ricercate le analogie 
tra i diversi dialetti, al fine di poter dare 
al lettore il suggerimento giusto per si¬ 
mulare un’istruzione inesistente nel pro¬ 
prio particolare dialetto BASIC. 

La ricerca di una specifica istruzione è 
agevolata dalla struttura del libro per 
argomenti, quali la grafica, la gestione 
file, il suono, ecc, rendendo così molto 
semplice ricercare ed avere dettagliata- 
mente descritta la funzione desidera¬ 
ta. 


COMMODORE 16 PER TE 
di R. Bonetti. L. Pazzncconl, 

F. Racchi 

Grappo Editoriale Jackson 

Come per i fratelli VIC 20 e C64, anche 
il CI6 è dotato in origine di una guida 
all’uso del tutto incompleta e carente 
sotto ogni punto di vista, tale da lasciare 
completamente disorientato e confuso 
il neofita che si accinge ad imparare la 
programmazione di questo computer. 
Fortunatamente è ora disponibile que¬ 
sto libro, che viene incontro, con detta¬ 
gliate spiegazioni e dovizia di esempi, a 
chi intende utilizzare il BASIC 3.5, im¬ 
plementato nel CI6, per creare dei pro¬ 
pri programmi. 

Completamente integrata dalla casset¬ 
ta allegata al volume, la lettura del libro 
procede spedita, mentre sul monitor 
compaiono gli esempi dei programmi e 
delle routine che affrontano tutti i pro¬ 
blemi iniziali, tipici del novello program¬ 
matore. 

Da spiegazioni su come utilizzare il regi¬ 
stratore a cassette, si procede analiz¬ 
zando via via la tastiera, il video e le 
istruzioni del linguaggio BASIC 3.5, per 
arrivare ad applicazioni più sofisticate, 
quali la grafica in alta risoluzione, il mo¬ 
do multicolore, il suono e le animazio¬ 
ni. 

Anche la gestione dati viene trattata 
dettagliatamente attraverso la presen¬ 
tazione di un archivio dati su nastro ma¬ 
gnetico. 

Un panorama completo, quindi, sulle 
possibilità del BASIC del CI6, conte¬ 
nente decine di utili trucchi e suggeri¬ 
menti, per renderne più semplice ed im¬ 
mediata la programmazione. 


i libri vengono offerti con il 
10% di sconto sul prez¬ 
zo di copertina 
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Vendo numerosi programmi gioco per 
C64, precisamene 100, ira cui: Pope- 
ye, Pit Stop. Wizaed Of War, Donkey 
Kong, Centipede. naturalmente con 
Turbo Tape, a L. 85.000 Antonio Sca¬ 
lia - Via Ricciardi 81100 Caserta Tel. 
0823 322484 

C ambio programmi per C64 su disco o 
cassetta. Inoltre vendo a L. 3,000 ca¬ 
dauno: Hes Games. Soccer. RaidOver 
Moscow, Pitfall I e II, ecc. Chiedere 
lista o inviare un supporto magnetico a : 
Massimo Bardetti • Via G. Verdi, 30 
20070 Castelnuovo B A (MI) - Tel. 
0377/60755 

Vendo per C64 una cassetta con 25 
giochi, tra cui: Zaxxon, Scacchi, Pac 
Man, Popeye. Soccer, ecc. al prezzodi 
L. 40 000 (comprese spese di spedìzio 
ne). Alberto Franchine - Via Libertà, 24 
98061 Brolo (ME) Tel. 0941,5615562 

Compro unità a dischi 1541 per C64 a 
L. 250.000 massimo. Telefonare nel pri¬ 
mo pomeriggio. Giorgio Cattacin • Via¬ 
le San Gimignano. 8, A 20146 Milano - 
Tel. 02/4155245 

Vendo giochi in LM Cassetta con : 
Pole Position, Congo Bongo, Trapper, 
Idolo D'Oro, Heros, Terni, tutti in Tur 
bo Tape a L 45.000. Telefonare ore 
pasti. Enrico Masserini Via Fieno, 3 
20123 Milano Tel 02/877408 

Compro, vendo, cambio software per il 
mio C64. Cerco inoltre floppy disk 
compatibile con C64. Pier Paolo Pan 
crazio • Via E. De Filippo, 59/bis 
84010 Cava dei Tirreni (SA) Tel, 
089/461836 

Vendo C64 con registratore, floppy 
disk, joystick. “Introduzione al BASIC" 
parte 1 della Commodore, giochi su 
disco Olimpiadi e Flighl Simulator ed 
altri giochi su nastro Dario Marchi - 
Corso del Popolo, 133 30172 Mestre 
(VE) Tel, 041/957586 

Vendo, cambio per C64: Clone. 
Unguard. Superclone, Austro Compi 
ler. Pel Speed, Koala. Doodle, Panora 
ma, Cale Result, Logo, Alice, Dallas, 
Bruce Lee, Zaxxon, Strip Poker, NA 
TO Commander, Sok> Flighl, Marco 
Scatà Via S, Freud, 62 96100Slracu 
sa Tel. 0931 5667 


Vendo VIC 20 più VFO per FT 102 
Yaesu mai usato. Gerardo Izzo Via 
Bellini, 1 81042 Calvi Risorta (CE) 
Tel. 873026 


Compro, vendo, cambio software per 
Commodore 64 a prezzi eccezionali. 
Faccio anche scambi. Telefonatemi, 
dalle 13.15 alle 21.00. oppure senvete 
mi. Federico Fusaroli Via Mantegaz 
za, 2 47037 Rimini (FO) Tel. 

0541/53013 

Vendo, cambio giochi in LM ed Utilities 
per C64 su disco o cassetta. Ne possie 
do circa 200. Telefonare o inviare lista, 
rispondo a tutti. Piero Bellentani Via 
D Calvari, 24 40129 Bologna Tel 
051,372753 

Compro dal miglior offerente sintetiz 
zatore vocale per VIC 20 in buono sta 
to e prezzo accessibile (spese di spedi¬ 
zione a metà). Cesare Malfettone Via 
Umberto I, 55 84087 Sarno (SA) 

Vendo per VIC 20 numeri arretrati di 
“Program" a L 4,500 (prezzo dei nu¬ 
meri nuovi L. 8.000 cadauno), A chi 
acquisterà 2 o più cassette, una in 
omaggio con vari giochi a sorpresa. Ce¬ 
sare Malfettone • Via Umberto I, 55 
84087 Samo (SA) 

Vendo VIC 20 6 mesi di vita con alimen 
latore, libro istruzioni, registratore de¬ 
dicato. 16 Kbyte RAM (8 più 8), in con¬ 
tenitore, 3 cartridge5, 7 cassette piene 
di giochi, tutto a L. 350.000 Bruno Bis 
saro Via A. M. Lorgna, 19 37053 
Cerea (VR) Tel. 0442/30559 

Vendo programmi per C64 su disco e 
cassetta: Ghostbusters, Raid Over 
Moscow, Summer Games e tanti altri. 
Prezzi modici Anche contrassegno 
Davide Galloni Via Magenta. 21 
21040 Cislago (VA) ■ Tel 02/96380220 

Vendo programmi su cassetta: S A.M. 
Recitar (sintetizzatore vocale), Tot 13, 
Gestione C C, Contabilità Familiare. 
Geometria. QBert. Shanus, Dig Dug. 
Music Machine. Sea Wolf, Matemati¬ 
ca, Dama. Briscola, Scacchi. Tutto a L. 
50.000. Roeano Zambito Via Sicilia, 17 
92026 Favara (AG) Tel. 0922/31056 

Vorrei cambiare VIC 20 più 45 cartrid 
gè con C64, Bruno Solnena Via Ca¬ 
stellino, 41/E 80131 Napoli Tel. 

081 254709 

Cambio programmi per C64, Inviatemi 
la vostra lista, Inoltre vendo gli stessi 
(Pu Stop. Zaxxon. Calcio, Tennis ...)a 
L. 1.000 cadauno più costo della cas 
sella e spese di spedizioni Acquisto 
mimmo 10 programmi, Inviare franco 
bolli per lista. Renzo Lenzl Piazzale 
Monlello, 8 57100 Livorno Tel. 

0586,804380 


Vendo qualsiasi tipo di software per 
C64 a L 3,000 cadauno. Possiedo fan 
tastici adventure e più di 200 titoli; di 
spongo inoltre di molte utility. Telelo 
rvare giorni pari Luigi Leonardi Via 
Monteborno, 18 33018 Tarvisio (UD) - 
Tel. 0428 274 


Vendo per C64 programma di revisio¬ 
ne prezzi contrattuali II programma 
permette di realizzare il conteggio 
completo ai sensi delle leggi sui lavori 
pubblici. Sia su disco che su cassetta. 
Scrivere a: Salvatore Moncada Via 
Manzoni, 36 93100 Agngenlo Tel. 
0922 27047 


Si sta formando, a Rieti, un nuovo club 
per C64 e VIC 20. Si accettano iscrizio¬ 
ni nella sola città di Rieti. Per informa¬ 
zioni telefonare a: Paolo Fioravanti - 
Viale Lionello Matteucci 02100 Rieti ■ 
Tel. 45092 


Vendo Alari più 4 giochi: Pac Man, 
Defender. Invader, Calcio a L. 220 000, 
il tutto come nuovo. Carlo Del Fatto - 
Via Laura. 68 84063 Paestum (SA) 
Tel. 0828/851250 


PerC64cambio,vendocirca 1,000 prò 
grammi di tutti i tipi a prezzi bassi. Pos 
siedo molte novità, con arrivi settima¬ 
nali. Scambi a pari livello. Scrivere o 
telefonare a: Emiliano Sagnotti - Via 
Bergamo, 12 35100 Padova Tel. 

049/651820 


Vendo VIC 20 più registratore C2N, 
joystick, 3cartridge.3libridedicati.200 
giochi, espansione 16-8-3 Kbyte, copri 
tastiera. Il tutto a L 400 000 non tratta 
bili. Claudio Spadazzi Via Tito Papi 
rio, 14 47100 Forlì Tel. 0543/35602 

Vendo, cambio software per C64; di¬ 
spongo di: Master, Pet Speed. Clone, 
Simons' BASIC. Last One. Super BA 
SIC, Turile Graphics, dBase I e II, Ara 
bian Night s, Olimpiadi. Pole Position, 
Decathlon, Vlsible Solar System, At- 
zec Cha,, Buck Roger», ecc, Marco 
Scatà Via S, Freud, 62 96100 Siracu¬ 
sa Tel. 0931/56672 


Cambio, vendo, software in linguaggio 
macchina, di ogni genere. Per la lista 
telefonare o scrivere a; Sergio Rivoletti 
Via Tevere 63017 Porto San Giorgio 
(AP) Tel. 0734,4419 

Vendo VIC 20 più registratore, cartrid 
ge Programmerà Aid. manuale in italia 
no. 4 libn per il VIC 20, tante cassette 
gioco anche in LM a L 400 000 non 
trattabili Giuseppe Ariano ViaCilea. 
6 20096 Pioltello (MI) Tel. 02/9240846 


Cambio software per il VIC 20 Inviate 
mi la vostra lista ed io manderò la mia. 
Giuseppe Mielli-Viale Tica, 167-96100 
Siracusa Tel. 0931 33421 

Vendo VIC 20 più registratore dedica 
to C2N (lutto perfetto), manuale in ita 
liano. libro “Alla scoperta del VIC 20", 
50 programmi, numerosi listati a L. 
250 000. Inoltre regalo joystick. Massi¬ 
mo Bonaventura Via Lorenzo Vida- 
schi ■ 00152 Roma Tel. 06 5345335 

Vendo, cambio software per C64. Di¬ 
spongo dei migliori programmi e delle 
ultime novità sul mercato. Rispondo a 
tutti, massima serietà. Claudio De Per 
si Via della Repubblica, 26 03029 
Verdi (FR) Tel. 0775, 365176 

Compro, vendo, cambio programmi di 
ogni tipo a prezzi bassissimi: QBert. 
Arcadia. Koala, Copy 190. The Hobbit 
a L. 2.000 cadauno escluse spese di 
spedizione e il costo della cassetta. Li 
sta gratis. Rocco Coluccelli Viale 
Ofanto • 71100 Foggia Tel, 0881/76114 

Vendo qualsiasi programma per C64: 
giochi, utility, gestionali, ingegneria, 
backup vari Aggiornamento continuo 
novità, Telefonare ore pasti oppure 
scrivere a: Paolo Negroni Via Berlini, 
4 40127 Bologna Tel. 051/504595 

Cambxi programmi di ogni genere per 
C64 su disco o cassetta. Giovanni Pu 
gliese Via A Volta, 93 74100Taranto 
Tel 099, 413769 

Vendo per C64 a L. 50.000 nastro con 
20 programmi tra cui Koala Patnter per 
disegnare, Decathlon, Manie Minar, 
Mundial Soccer, Gyruss, ZAxxon, 
Break Dance, ecc, Tutti registrati in 
Turbo Tape A chi acquista la cassetta 
regalo Turbo Tape. Telefonare ore pa 
sii oppure scrivere a: Rossana Darutinl 
Via Michele Burattelli, 38 57021 
Camplglia Marittima (LI) Tel. 

0565/837718 



Vendo V1C 20 più tassella "Star For 
ce", cassella “Milliped", cassetta con 
circa 60 giochi, cartuccia “Gorf", joy¬ 
stick a L. 200.000 Telefonare ore pasti 
a: Massimo Curalella Via Monte Ro 
sa, 2 00010 Colleverde di Guidonia 
(RM) Tel. 0774/361327 


Per C64 offro più di 300 programmi. 
Potenti copiatoli e bellissimi giochi 
(Disk Mimic SummerGames). Vendo 
o cambio. Michele Tanzi Via Matte- 
otti, 76 55048 Torre Del Lago (LU) ■ 
Tel. 340179 

Vendo VIC 20 più registratore C2N. 
espansione 3-8-16 Kbyte, cartuccia, 
circa 130 giochi (ed utility) fra cui Space 
Invadere, Pac Man. Crazy Kong; tutto 
in perfetto stato a L. 400.000 Franco 
Piccini - Via Avancini, 26 20142 Milano 
Tel. 02 8467152 

Regalo Commodore 64 a chi si compra 
350 dischi pieni di novità, giochi ed utili 
là. causa fine hobby. Giuseppe Borrac 
Ci Via Mameli, 15 33100 Udine Tel. 
0432,291665 

Compro per C64 single drive 1541 e 
stampante MPS802 a prezzo ragione 
vole Andrea Lanieri - Via Taramelli. 
35, 5 39100 Bolzano Tel. 0471,47994 

Vendo a L. 320.000 VIC 20 più manuale 
d'istruzioni, cartndge gioco “Super 
Alien", cavetti di collegamento al televi¬ 
sore e joystick. Rosario Consiglio Via 
Sonnino. 12 96017 Noto (SR) Tel. 
0931/835313 

Vendo, cambio circa 100 giochi e tante 
utility Tutti i programmi sono in Turbo 
Tape (L. 5.000 a programma), Manda 
re la propria lista per ricevere la mia. 
Sergio Siciliano - Via Pugliese, 3 - 89015 
Palmi (RC) Tel. 0966/22038 

Vendo VIC 20 con modulatore TV e 
manuale d'uso a L. 140.000. Insieme 
regalo alcuni programmi. Cambio inol¬ 
tre programmi per C64. Telefonare ore 
20.00 a: Riccardo Baldereschi Via 
Matteotti, 18/6b 20068Peschiera Bor 
romeo (MI) Tel. 5472697 

Posseggo oltre 100 programmi per C64 
che cambio o vendo a prezzi ridicoli (da 
L. 1 500 ad un massimo di L. 3.000). 
Richiedere la lista gratuita. Antonio 
Gravina Via Vespucci, 28 56100 Pisa 
Tel. 050 24381 

Avete un C64 e volete un programma 
per fare musica? Telefonatemi o scrive¬ 
temi. perchè solo con una manina, co¬ 
me il Magic Desk, farete musica stu¬ 
penda Programma solo su disco a L. 
10.000 Inoltre dispongo di ottimi giochi 
(Popeye, Calcio, Frogger, Burgertime, 
ecc.) in LM a prezzi stracciatissimi. Af 
farone! Giancarlo Baiocchi Via Livor¬ 
no, 36 00162 Roma Tel. 02 426888 


Cambio software per C64 solo su di 
sco. Dispongo di oltre 2.000 program 
mi con ultime novità USA: chiedere 
elenco. Dischi vergini a L. 3 000! Paolo 
Gallo Via Garibaldi. 83 96014 Floridia 
(SR) Tel 0931, 941056 

Cambio cartuccia “Le Mans" per istru¬ 
zioni originali di “Alto Medioevo" e 
"Andromeda Conquest". Luca Conti - 
Casella Postale 112 56021 Cascina 

(PI) 

Vendo computer VIC 20 a L. 240 000 
con registratore Commodore, joy¬ 
stick, 120 giochi Garantisco massima 
serietà. Per ulteriori informazioni tele 
fonare o scrivere a: Luca Maccechini • 
Viale Virgilio. 27 34170 Gorizia Tel. 
0481 89110 

Vendo qualsiasi programma per C64: 
giochi, utility, gestionali, ingegneria, 
backup, vari Aggiornamento conti¬ 
nuo. novità. Telefonare ore pasti a: Pa¬ 
olo Negroni - Via Bertinì, 4 40127 Bo 
logna Tel. 051, 504595 

Vendo VIC 20 più espansione 3 8-16 
Kbyte. 2 libri, 189 giochi. 72 utility a L. 
350.000 Solo 8 mesi di vita, Alberto 
Lame - Via Cacciatori Sile, 27 • 31100 
Treviso - Tel. 0422 52693 

Vendo per VIC 20 a L. 5.000 cadauno i 
seguenti programmi; Trout, Multi 
Tron, Star Force, Space Swarm, Milli- 
ped. Arcade. Tutti i programmi sono 
registrati originali Sirius. Vendo anche 
in blocco a L 25.000. Telefonare ore 
pasti. Rita Lepri Via Aurelia, 416 ■ 
57012 Caletta (LI) Tel, 0586 762972 

Vendo VIC 20 più espansione 16 
Kbyte. registratore C2N, Mother Bo 
ard 3, 3 slot; in regalo software per un 
valore commerciale di L. 50,000. Tutto 
a L. 450.000 trattabili. Giovanni Mac 
chioni Via F. Roncalli, 1 24100Berga 
mo Tel. 035, 258388 

Vendo all’eccezionale prezzo di L. 
1.500 (cassetta inclusa) i migliori giochi 
per CBM 64 (Decathlon, Popeye, Soc¬ 
cer, Basket, Donkey Kong,ecc.). Piero 
Migliaccio Via G Carbonesi, 51 • 
80124 Napoli Tel. 081 7601241 

Cambio software per C64 Dispongo di 
fornitissima nastroteca e "discoteca" 
giochi e programmi di utility. Inviare 
elenchi. Fabio Solimini Viale Degli An¬ 
gioini. 2 88100 Catanzaro Tel. 

0961/72816 

Vendo per C64 centinaia di programmi 
di ogni genere, ultime novità, prezzi 
modici. Richiedere listino gratis o tele 
fonare a: Paolo Cianetti ■ Via Ridolfi, 67 
50053 Empoli (FI) Tel. 0571/76578 


Vendo Commodore 64 più registratore 
dedicalo, 100 programmi, libri e ma 
nuali, copri C64 a L. 450.000 Sergio Di 
Pietro Via Etna, 7 00141 Roma Tel. 
06 8929065 

Per C64 vendo cassetta con 40 fra i 
migliori videogames a L. 50.000; in re 
gaio tre programmi di utilità Spedizio 
ne contrassegno. Giacomo Lombardo 
Via R Anseimi, 23 95043 Lineo 

Misterbianco (CT) Tel. 095, 474712 

Vendo centinaia di programmi per C64 
su cassetta o disco, per ogni vostra 
esigenza: simulazioni, sport, Utilities, 
copiatori, ecc. e tantissime novità 
(Snoopy. Break Dance, S.A.M., Aero 
bica. ecc.). Richiedere listino gratuito 
a: Paolo Cianetti Via Ridolfi, 67 50053 
Empoli (FI) - Tel. 0571/76578 

Per C64 con 1541 vendo Flight Simula 
tor II con manuale in italiano e carte di 
navigazione; il simulatore di volo più 
completo, che riproduce tutti i coman¬ 
di del Piper e con voli simulati in tempo 
reale. Telefonare ore pasti. Marco Fer 
ruzzi • Via R. Giuliani, 256 50141 Fi¬ 
renze - Tel 055/454777 

Vendo per VIC 20: Pac Man. Wall. 
Cyclon Zap. Briscola. Sette 1/2, ecc. a 
L. 2.000 cadauno. Vendo utility come 
Totocalcio, Gestione Magazzino. Bi 
lancio Familiare a L. 2.500 cadauno. 
Danilo Tomatis - Via Europa. 59 20060 
Pessano (MI) 

Cambio, vendo software per VIC 20 a 
prezzi bassi, tra cui: Dragonfire. De- 
mon, Attack, Atlantis, Shamus. I pra 
grammi sono su nastro, con espansio 
ne modificata, Chi sia interessato scri¬ 
va a: Carmelo Muzzetta Via Treviso, 
64 95030 Mascalucia (CT) 

Vendo a prezzi ridottissimi splendidi 
giochi ed ottime utility per Commodo¬ 
re 64. Sono disposto anche a scambi. 
Richiedere informazioni ed inviare la 
propria lista a: Aldo Zomparelli Via S. 
Francesco, 58 03023 Ceccano (FR) • 
Tel. 0775/600388 

Cambio VIC 20 inespanso più alcuni 
programmi e due manuali sull'utilizzo 
del VIC 20 stesso con programmi per 
C64 veramente interessanti. Mauro 
Brundu Piazza Cantore, 22 • 38100 
Trento • Tel, 0641/39047 

Vendo, cambio, ma soprattutto com¬ 
pro software per C64 (giochi, utility). 
Inviare proprie liste a: Giuseppina Ros 
sini ■ Via Sciroscio 85010 Anzi (PT) 

Vendo oltre 200 programmi per C64 
tra i quali Decathlon. Break Dance, Po- 
peye su disco e cassetta a partire da L. 
5.000 cadauno. Inviare L. 500 in franco¬ 
bolli per lista. Massima serietà. Paolo 
Franceschi™ • Via Cavalieri 26013 
Crema (CR) 


Vendo consolle Alan più due videoga 
me usati pochissimo. Per informazioni 
telefonare dalle 14.00alle 17.00 Matteo 
Facciorusso Via Ruggero Bunghi 
71037 Monte S.Angelo (FG) Tel. 
0884,61003 

Vendo consolle CBS Coleco Vision an 
cora in garanzia con 2 cassette, 2 joy 
stick, trasformatore. Prezzo trattabile, 
telefonare ore pasti o scrivere, Andrea 
De Rosa - Via Marussig, 50/7 - 16166 
Genova Quinto - Tel 010 332580 

Vendo programmi per CBM 64 tra cui: 
Decathlon. Frogger. Calcio 3D, Burger 
Time. ecc. Per informazioni rivolgersi 
a: Marcello Pruonto Via Capitan Pirei 
li, 24 70043 Monopoli (BA) Tel. 

743839 

Per CBM 64 cambio programmi su di¬ 
sco e/o cassetta: Movie Maker (con 
manuale), Ghostbusters, Highnoon. 
Beach Head, Pit Stop. Chatterby (cor¬ 
so di inglese parlante), S.A.M., Master 
64. Superbase. The Manager. Easy 
Script. Simons - BASIC, tutti con ma 
nuate in italiano; Flight Simulator 11 
(con manuale). Turbotape, Turbodisk, 
Doodle, Magic Paint. Koala, ecc. Deci¬ 
ne dì riviste e libri in italiano ed inglese. 
Annuncio sempre valido. Telefonare 
ore pasti a Gian, tei. 02/592459 

Vendo, cambio per C64 software in 
LM, di altissimo livello (Summer Ga 
mes. Raid Over Moscow, Ghostbu¬ 
sters. ecc ). Vendo a L. 1.500-2.000 ca 
dauno. Cambio con chi invia la lista, 
assicuro risposta. I programmi sono 
disponibili su disco e su nastro. Annun 
ciò sempre valido, scrivere a: Marcello 
Palazzari Via Garibaldi, 14/4 09013 
Carbonia (CA) 

Vendo, cambio programmi per C64. 
Per eventuali informazioni scrivere o 
telefonare a: Mauro Santini Via Roma. 
3 -17041 Altare (SV) • Tel. 019/58058 

Vendo software per C64. Dispongo 
delle ultime novità: Mission Impossible, 
Summer Carnee. Suicide Express, 
Ghostbusters, Paperino, Indiana Jo¬ 
nes, Valhalla, Arabian Nights, Raid 
Over Moscow; sia su disco che su cas 
setta. Marcello Porro - Via Volta, 8 
20017 Rho (MI) Tel. 02/9307205 

Vendo giochi ed utility per C64, tutti a 
L. 500 I programmi sono su cassetta. 
Scrìvetemi o telefonatemi indicando le 
vostre preferenze (sport, ecc ), Andrea 
Panighetti Via Residence City, 18, A 
36067 Termine di Cassola (VI) • Tel. 
0424/31645 

Compro, cambio, vendo programmi 
per C64 e VIC 20. Per maggiori infor¬ 
mazioni scrìvere a: Massimo Tabasso 
Piazza Molìnerie, 1 12038 Savigliano 
(CN) 









































































ELENCO DEI TITOLI DISPONIBILI 


I tascabili Jackson sono uno 
strumento prezioso per chi lavora 
con il computer. 

■SINCLAIR SPECTRUM cod. 017H 
•VIC 20 cod. 005H 
•COMMODORE 64 cod. 002H 
-PC IBM cod. 018H 


-BASIC cod. 007H 
•ASSEMBLER Z80 cod. 016H 
•ASSEMBLER 6502 cod. 013H 
•COBOL cod. 001H 
•FORTRAN 77 cod. 01 OH 
•PASCAL cod. 006H 


•APPLE Ile cod. 003H 
-SHARP MZ80A cod. 014H 
•LA PROGRAMMAZIONE cod. 004H 
-WORD STAR cod. 008H 
•UNIX cod. 009H 
•LOGO cod. 020H 
■MS-DOS cod. 019H 
■PROGRAMMI DI STATISTICA cod. 
015H 

■CP/M cod. 01 IH 
•PC-DOS cod. 012H 


OGNI TASCABILE COSTA L. 8. 
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